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Pytacie, jak się ma numeracja TA 
do miesięcy tcy.y aby na pewno jeste 
smy m i es i ęcy riikwm'1. Tak! W tym ro¬ 
ku nr I oznacza styczeń. 2 - ta luty 
itd Kfimf drobnych poślizgów czaso¬ 
wych (staramy się je nadrobić, wierz.- 
dcl planujemy oddaj Wam 12 numer 
przed fiw azdką 


p-■— j—i 

Pis/.ccid, dzwonicie, ze trudno nie¬ 
raz, kupie TA u> kioskach RUCHU 
Spróbujcie inaczej! Istnieją przecież 
kluby miłośników komputerów, oficjal¬ 
ne Iz. szyldem 1 lokalem) 1 prywatne 
(kilku kolegów z. podwórka! Umówcie 
się między sobą. Kupując gazetę bez. 
pośrednio u nas otrzymujecie (patrz 
sir 101 duz.e znizkl' 

W wiciu miejscowościach istnieją 
sklepiki z oprogramowaniem i akceso 
rtaml komputerowymi, punkty na¬ 
praw t przeróbek sprzętu "mikro". 
Nawiążcie z. nami współpracę' Wyeli¬ 
minujmy z. gry nierzetelnego gnusne- 
go pośrednika 

Wiele takich punktów kooperuje 
z. nami od dawna. Planujemy wydm 
kować w TA spis naszych oficjalnych 
" dealerów " Będzie to dla nich zara- 
zetn.Xq.txla, skuteczna reklama. 

Wygaśnięcie cyklu j "Piszemy DEMO" 
wzbudziło jatę protestów Dcl przy¬ 
szłego numeru fA mila tematyka po- 
wipcl rta nasze łamy 
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!i7 mu M/M 


Programy z klocków 


Każdy, kto napisał juz w życiu 
kilka programów, spostrzega, ze 
pewne procedury powtarzają się 
w wielu z nich A zatem przy pisa¬ 
niu kolej nego dzieła korzysta się 
nieraz z gotowych rozwiązań Qulck 
Assembler z Jego operacjami na 
blokach tekstu wydaje się wręcz 
stworzony do tego, by składać no¬ 
we programy ze sprawdzonych 
fragmentów starych 

Jednak podczas takiego monto¬ 
wania programu napotyka się czę¬ 
sto na szereg trudności Kawałki 
nie chcą pasować do siebie z uwagi 
na konflikty nazw, odmienne wyko¬ 
rzystywanie pewnych komorek pa 
mięci rożny sposob przekazywania 
parametrów Można temu zapobiec, 
jeśli juz w trakcie pisania takiego 
często wykorzystywanego modułu 
będziemy pamiętać o kilku pros¬ 
tych zasadach Pokażę to na przy 
kładzie prostego programu 


programach Stwórz osobny plik 
deklaracji EQU tych najważniej¬ 
szych etykiet Można go dołączać 
do każdego pisanego programu 
(najwygodniej - z RAM-dysku, roz¬ 
kazem ICL) 

* - rejestry pakietu FP 

fr0 equ $d4 

cix equ $f2 

rnbuff equ $f3 

* - system 

runad equ $2E0 

lnitad equ $2E2 

dosrun equ $A 

dosini equ $C 

iocb equ $340 

Jeżeli piszesz następny program, 
korzystający z Innych procedur i ko¬ 
morek. mozesz dopisać je do dotych 
czasowego zestawu Dzięki zastoso¬ 
waniu nazw uświęconych tradycją 
nie ma obawy, ze zostały lub zostaną 
użyte w Innym znaczeniu 


rozczarowanie, sięgnąwszy do 
swych dawnych programów, by 
skorzystać z zawartych w nich po¬ 
mysłów Niestety' Programy były 
tak napisane, ze nie potrafiłem 
z nich nic zrozumieć 

Wiemy, które komorkl strony ze¬ 
rowej nadają się do wykorzystania 
W większości programów używa się 
zmiennych roboczych lezących 
w tym obszarze Warto stworzyć 
uniwersalny ich zestaw Nadaj im 
nazwy raz na zawsze Przyda się 
z pewnością kilka komorek jedno- 
bajtowych (można je, stosownie do 
przeznaczenia, nazywać BYTE, 
CHAR FLAG, COUNTER lub po 

naszemu BAJT, ZNAK ZNACZNIK 
LICZNIK) i dwubajtowych (ADDR 
PTR, WORD albo ADRE WSK, 
SŁOWO) 

*- strona 0 

byte equ $cb 

addr equ $cc 

word equ $ce 


Stwórz plik nagłówkowy 

Często odwołujemy się do proce¬ 
dur systemowych (takich Jak CIOV. 
WARMST, SETVBV) 

* TA POKER autor: JBW 

* (c) 1992 Tajemnice ATARI 

opt % 100101 

* - procedury w ROM 

afp equ $D800 

fpi equ $D9D2 

ciov equ $E456 

Sięgamy tez do tablic 1 pojedyn¬ 

czych komorek (jak IOCB, BOOT. 
CONSOL) Ustalmy dla nich, podo¬ 
bnie jak do procedur, stałe nazwy 
(najlepiej te najczęściej spotykane 
w literaturze) Będzie łatwiej zapa 
mlętac, co dany kawałek robi Przy 
okazji nasz program stanie się czy¬ 
telny i zrozumiały dla Innych Te 
procedury wykorzystuje się w wielu 


io 

com 

equ 

iocb+2 


io 

sta 

equ 

iocb+3 


io 

adr 

equ 

iocb+4 

(2) 

io 

len 

equ 

iocb+8 

(2) 

io 

mod 

equ 

iocb +10 


io 

aux 

equ 

iocb+11 



Często w programach używamy 
stałych Niech was ręka boska bro¬ 
ni przed pisaniem "LDX #16"! Cóz 
to Jest takiego"? To może oznaczać 
wszystko. Jeżeli napiszesz "LDX 
#CHNl”, to każdy (nawet ja) zorien¬ 
tuje się o co chodzi 

*-stale 


chn0 

equ 

© 

channel $0 

gett 

equ 

5 

get text 

putt 

equ 

9 

put text 

getb 

equ 

7 

binary get 

putb 

equ 

11 

binary put 

eol 

equ 

155 

end of linę 


Nie żałuj komentarzy Wierzę, ze 
nie cierpisz na sklerozę 1 będziesz 
jutro, a nawet pojutrze pamiętać, 
co robi Twój program Ale zapo¬ 
mnisz za miesiąc. Albo za rok 
Ostatnio przeżyłem takie właśnie 


Nie martw się, jeśli nasz uniwer¬ 
salny plik nagłówkowy nie będzie 
od razu doskonały Każdy następny 
program przynosi nowe doswlad 
czenia Gromadź je cierpliwie, mo¬ 
dyfikując zestaw definicji Od czasu 
do czasu sprawdź, czy Twoje stare 
programy asemblują się jeszcze 
z tak ulepszonym zestawem Będą, 
Jeżeli zmiany polegały tylko na do 
dawaniu nowych, unikalnych defi¬ 
nicji Użytkownicy stacji dysków 
mogą ten plik dołączać za pomocą 
rozkazu ICL Wielbiciele magnetofo¬ 
nu będą zapewne woleli wgrać go 
do edytora 1 dobudować do niego 
resztę programu 

TA Poker 

Program przykładowy będzie 
umożliwiał wykonanie Instrukcji 
POKE z poziomu DOS-u lub COS-u 
Czasem chciałoby się jej uzyc, by 
np zmienić kolory lub uruchomić 
silnik magnetofonu, a BASIC jest 
akurat odłączony 
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Jak każdy, tak i nasz program wy¬ 
konuje operacje wejscla/wyjscia 
(trudno sobie wyobrazić taki pro¬ 
gram, który nie pobiera żadnych da¬ 
nych i nie objawia w żaden sposob 
efeklow swej pracy). Najpospoliciej 
używaną ich formą Jest wyświetlanie 
komunikatów i pytań Procedura, 
która to robi, może (raz opracowana) 
byc bez zmian przenoszona z progra 
mu d ) programu Lepiej wszakze za 
chowac ją (I Jej podobne) w osobnym 
pliku, zwanym biblioteką, który moż¬ 
na po/niej wykorzystywać, podobnie 
jak nagłówek, dołączając do rożnych 
programów 

Najlepsze efekty daje konstru 
keja 'inteligentnych" procedur Na¬ 
sza będzie umiała znalezć i wy¬ 
świetlić odpowiedni komunikat, 
znając tylko jego kolejny numer 
W tym przypadku będą potrzebne 
cztery pusty - dla wprowadzania 
odstępów, tytułowy - na przywita 
nie, pytanie o adres, pytanie o bajt 
W innym programie teksty mogą byc 
inne - proc-edura się nic zmieni 

*- numery komunikatów 

nul_m equ 0 

tit_m equ 1 

adr m equ 2 

byt_m equ 3 


Jest wskazane, by wykonanie 
programu zaczynało się od począt¬ 
ku Jego kodu Nie |est to oczywiście 
konieczne w typowych przypad¬ 
kach, lecz czasami bardzo się przy¬ 
daje Ułatwia na przykład dołącze¬ 
nie RELOCATORa, zrezygnowanie 
w SparlaDOS-l ■ z podawania adre¬ 
su startu .. Aby to uzyskać, można 
umiescic główny blok programu 
na początku Równie dobre byłoby 
rozpoczęcie od JMP MAIN do miej 
sca. gdzie faktycznie zaczyna się 
program 

org $8000 

main ]sr mit 

* główna pętla 

loop ldx #nulm 

jsr dsp_msg 

* pobierz adres 

ldx #adr_m 
jsr get_text 
bmi loop 

* pusty wiersz? 

dec io_len,x 
beq quit koniec 

* dekoduj adres 

jsr deco 
sta addr 
sty addr+1 

* pooierz bajt 

ldx #byt_m 
jsr get_text 
bmi loop 

* pusty wiersz? 

dec io len,x 


beq loop od nowa 

* dekodu] bajt 

]sr deco 

* wstaw bajt pod adres 

ldx #0 
sta (addr,x) 

* jeszcze raz 

jmp loop 

* powrot do Dos—u 

quit ]mp (dosrun) 

Plan 

Rozpoczynając pisanie rozumia 
łem, ze trzeba na wstępie wykonać 
jakieś operacje przygotowujące, lecz 
nie byłem pewien, Jakie. Stąd 
"JSR INIT", potem coś się wymyśli 

Głowna pętla jest dość prosta 
Konstruując ją. myślę o dostępnych 
mi klockach procedurach 1 staram 
się przede wszystkim z nich ukła¬ 
dać akcję programu Ich nieobe¬ 
cnością na razie się nie przejmuję 
W najgorszym razie te fragmenty, 
których nie znajdę w dotychczaso¬ 
wej bibliotece, będę musiał dopisać 
(i dołączyć do biblioteki 1 ) Rozpo¬ 
czynam od wyświetlenia pustego 
wiersza (robi na ekranie odstęp po 
poprzednich tekstach) Wykona to 
procedura DSP TXT Pobranie ad 
resu polega na wyświetleniu pyta¬ 
nia. odebraniu tekstu (zrobi to pro¬ 
cedura GET_TEXT) i /dekodowa¬ 
niu go, by otrzymać liczbę Wpro¬ 
wadzenie przez użytkownika puste¬ 
go tekstu (sam RETURN) będzie 
oznaczało rezygnację. Długość te¬ 
kstu można znalezc w stosownych 
komórkach tablicy IOCB (rejestr 
X wskazuje konkretny blok) Ponie¬ 
waż nie da się wprowadzić dłuższe¬ 
go tekstu od 120 bajtów (pomysł, 
dlaczego*?) cała liczba mieści się 
w jednym bajcie Jest ona równa 
co najmniej 1, bo do tekstu wlicza 
się także kończący RETURN Pro 
cedura DECO zwróci wprowadzone 
słowo w rejestrach A i Y Analogiez 
nie pobiera się bajt i POKE' Po 
nowny skok na początek pozwala 
na wprowadzenie wielu "pokow" 

* - wypisz tekst 

dsp_msg equ * 

* odszukaj tekst nr X 

Idy #0 

fm0 dex 

bmi mout 

fmes Ida data,y 

iny 

emp #eol 
bne fmes 
beq fm0 (}mp) 
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* wypisz 
mout txa 

ldx #chn0 
sta io_len f x 
clc 
tya 

adc dtaa 
sta io_adr,x 
Ida #0 - 

sta io_len+l,x 
adc dtaa+1 
sta io_adt+l,x 
Ida #putt 
sta io_com,x 
jmp ciov 

Podprogramy 

Odszukanie tekstu na podstawie 
numeru jest proste, jeżeli każdy 
tekst zajmuje jedną linijkę (kończy 
się znaklt m End-Of Llnc) Dodatko¬ 
wo ułatwia sprawę fakt ze wszystkie 
teksty zajmują mniej nlz 256 bajtów, 
dzięki czemu można je objąć zakre¬ 
sem zmian rejestru indeksowego Y 
Do wyświetlenia tekstu jtosłuzyłem 
się rozkazem WE/WY put tort" (5), 
który powoduje wyswli tlenie jednej 
linijki tekstu Do procedury C!OV 
przekazuję jakąkolwiek, duża dłu 
gose, a operacja przebiega tylko do 
pic rwszego E O-L. 

* -pobierz tekst 

get_text ]sr dsp_tr.sg 
ldx #chn0 
Ida #gett 
sta io_com,x 
Ida txta 
sta io_adr,x 
Ida txta+l 
sta io_adr+l,x 
sta io_len+l f x 
jmp ciov 

Analogicznie przebiega odebranie 
tekstu Dla rozkazu WEAVY gett 
podaje się dowolną długość, byle 
większą od spodziewanej, a w od¬ 
powiedzi w słowie lOLEN otrzy¬ 
mujemy rozmiar przesłanych da¬ 
nych 

* - dekodowanie 

deco Ida txta 

sta mbuff 
Ida txta+l 
sta inbuff+1 
Ida #0 
sta cix 
jsr afp 
jsr fpi 
Ida fra 
Idy fro+l 
rts 


Do zamiany wprowadzonego 
tekstu (kodow ATASCII cyfr) najwy¬ 
godniej użyć procedur Jiytmetyez- 
nych zawartych ROM le Proce¬ 
dura AFP mamienia ciąg znaków na 
liczbę rzeczywistą w tzw formacie 
zmiennoprzecinkowym (w skrócie 
FP) Adres tekstu przekazuje się 
w słowie INBUFF, zaś bajt CIX za¬ 
wiera odległość liczby od początku 
tekstu Rezultat znajdzie się w reje¬ 
strze FRO Procedura FPI zamienia 
liczbę z formatu FP na dogodną dla 
nas dwubajtową postać binarną. 
Rezultat znajdziemy także w FRO 

Na etapie testów można używać 
procedury początkowej v postaci 
"INIT RTS'. Później okazuje się 
zwykle, że należy na wstępie coś 
zrobić, np wyzerować pewne ko¬ 
mórki Nasz program wyświetli tyl¬ 
ko swój tytuł 

* - procedura początkową 

init ldx #tit_m 

■jmp dsp_msg 

Końcówka 

Często zachodzi potrzeba przesu¬ 
nięcia programu w pamięci na gra 
nlcę MEMLO Dotyczy to zwłaszcza 
koplcrow, które dzięki temu potrą 
flą wykorzystać całą dostępną pa¬ 
mięć. Ponieważ pokazany na przy 
kładzie POKER-a schemat postępo¬ 
wania jest typowy także dla pros 
tych programów kopiujących 
i transkodujących, ma także (choc 
tym razem to zbędne) strukturę 
przystosowaną do RELOCATORa 
przedstawionego w TA 8'91 

* - znak końca 

brk 

* - dane adresowe 

dtaa dta a(data) 

txta dta a(text) 

dta a(0) 

1 na koniec dane tekstowe, bufor 
dla wprowadzanych liczb i adres 
uruehomienl;i dla DOS-u lub COS u 
W SpartaDOS-ie adres uruchomie¬ 
nia jest zbędny Co więcej, rozkaz 
RUN działa w nim poprawnie tylko 
wtedy, gdy tego adresu nie było. 

* -dane 


data equ * 

dta b(eol) 



dta c' TA poke t > * 

dta b(eol) 

dta c'Address:' 

dta b(eol) 

dta c'Byte:',b(eol) 

text org *+120 


*- adres uruchomienia 

org runad 
dta a(main) 

end 

Zwroc uwagę na sposob zarezer¬ 
wowania pamięci na bufor tekstu 
Z listów do redakcji wynika, ze nie¬ 
raz masz z tym kłojx>ty Rozkaz "ORG 
*+120” przesuwa wskaźnik lokacji 
programu o 120 bajtów w przód, 
a etykieta TEXT ma wartość równą 
adresowi początku tego obszaru 

Procedury DSP_MSG, GET_TEXT, 
DECO nadają się do umieszczenia 
w bibliotece, na pewno przydadzą się 
w niejednym programie Warto je tylko 
uzupełnić o krotki opLs realizowanych 
funkcji sposob jxxiawania parame¬ 
trów i odbierania rezultatów 

Errata: W TA 7/91 (rekordo¬ 
wym jxxi względem liczby błędów) 
w programie na stronie 5 mylnie 
wydrukowano ”LDA IOCB+5 , X" za 
miast poprawnego "STA IOCB+5, X". 
Serdecznie przepraszam 


Janusz B Wiśniewski 


D^fot 


OgZWfZ 


TURBO 2000 

do samodzielnego montażu 

• przyspiesza ponad 8-krotnle 
transmisję danych z magnetofonem 
(czyli max czas wgrywania 
programów to ok 2-3 min ) 

• oszczędza kasety (ok 50 progra 
mów na C-60) 

• łatwy montaż prosta obsługa 

Ponadto: 

Duży wybór oprogramowania 
w TURBO 2000 gry dema użytki 
gotowe zestawy, oprogramowanie 
licencjonowane cartrłdge; Inne 
drobiazgi do ATARI XE/XL 

Sprzedaż wysyłkowa. Katalogi gratis. 

S. K. CHIP 

Al. Wojska Polskiego 14 

•4-320 PONIATOWA tel 45-14 
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IJ 

1000 

WY 

1002 

YG 

1004 

YY 

1006 

JP 

1008 

IJ 

1010 

JO 

1020 

KR 

1030 

m 

1040 

LF 

1050 

VE 

1060 

WF 

1070 

ZG 

1080 

VA 

1090 

CL 

1100 

GY 

1110 

3EL 

1120 

QS 

1130 

PZ 

1140 

XI, 

1150 

DE 

1160 

xc 

1170 

HB 

1180 


REM *-* 

REM : SAMPLER : 
REM : autor: Krystian Bylica : 
REM : (c) 1992 Tajemnice ATARI : 

REM *-* 

DATA ffff0006d206a2b9a0062042c6 
DATA 2030fea2008elad08e01d28e0e 
DATA d4 8e00d4 a9 3 4 8d02d3 205 6 f 5 20 
DATA ac06c91ef040c91fd0f520al06 
DATA 20ac06d0eda90285cda90f85d0 
DATA aaad00d3c9fff002c6d0cad0f4 
DATA blce0a0a0a0a05d091cec6cdd0 
DATA el8dlad0c8d0d2e6cfa5cfc9c0 
DATA 90ca4c0a0620al0620ac06d0bl 
DATA a90285cdblce8dlad04a4a4a4a 
DATA 09f049e08d01d2a22fcad0fda2 
DATA ef8e01d2blcec6cdd0e9c8d0d4 
DATA e6cfa5cfc9c090cc4c6706ace8 
DATA 02c884cfa00084ce60adfc02c9 
DATA f£f005a2ff8efc02607dldldld 
DATA 7f2053414d504c455220627920 
DATA 4b2e42796c6963619be002el02 
DATA 0006 


Od dawna panował mit muzyki digitalizewa- 
nej, okazuje się, że można to zrobić prostym 
sposobem, a mianowicie: interfejs TURBO 
2000 (i podobne) przesyła dane z kasety do 
komputera w formie zer lub jedynek. Wystar¬ 
czy odpowiednio je zakodować w pamięci, a po¬ 
tem odtworzyć. 


Do otrzymania samodzielnego programu należy użyć 
Zgrywusa+ (TA 1/92) Program w tej wersji przezna¬ 
czony jest dla posiadaczy Interfejsu TURBO 2000 
z przewodem podłączanym do II portu joysticka (może 
byc wbudowany do firmowego magnetofonu) 

INSTRUKCJA OBSŁUGI 


KODOWANIE 

• 1, Pobranie 15 próbek (zer lub jedynek) 

• 2. Podczas wpisywania do pamięci bajt dzielę na 
dwie części po 4 bity każda 1 wpisuję liczbę jedynek 
do pierwszej części 

• 3 Powtarzam operację 1 12 z tym, ze liczbę jedy 
nek wpisuję do drugiej części W ten sposób jeden 
bajt mam zapełniony 

• 4 Powtarzam wszystko od początku tylko dane bę 
dą wpisywane do następnego baj tu, az do końca 
wolnej pamięci. 

ODTWARZANIE 

• 1 Pobieram z bajtu pierwszą Jego częsc. włączam 
bity odpowiadające za zniekształcenia I wysyłam do 
komórki odpowiadającej za głośność kanału 1 Co¬ 
fam membranę głośnika. 

• 2. Operację 1. powtarzam, ale odtwarzana będzie 
druga część bajtu 

• 3. Powtarzam wszystko od początku, tylko odtwa¬ 
rzany będzie następny bajt, az do końca pamięci za¬ 
jętej przez dane. 

Przy tym sposobie kodowania 1 przy 47360 bajtach 
używanej pamięci dostajemy 16 sekund dlgltalizowanej 
muzyki. 

Całe to wyjaśnienie może sprawić kłopoty począt¬ 
kującemu programiście, ale tych, którzy zrozumieli, 
namawiam do samodzielnego rozbudowania progra 
mu, na przykład o wykres graficzny, odtwarzanie wy¬ 
branego fragmentu nagranie "dema*'. 


Po uruchomieniu programu pojawi się nagłówek - 
naciskamy dowolny klawisz Od tej chwili 

• Klawisz 1 służy do pobierania dźwięków. 

• Klawisz 2 służy do odtwarzani i dźwięków 

• Każdy Inny przerywa jedną z tych operacji (pojawia 
się sygnał dźwiękowy) 



Ps. Dziękuję Piotrkowi 1 Przemkowi za udostępnienie 
mi sprzętu. 


Krystian Bylica 
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XEB Jest nakładką współpracującą z BASIC-em, 
dysponującą widoma opcjami ułatwiającymi pisanie 
i uruchamianie programów w BASIC u 

Plik XEB wczytujemy za pomocą DOS u lub COS u 


XEB korzysta z pamięci RAM pod ROM-em BASIC-a 
i lokacji $500 $57F oraz 0 7 na stronie zerowej. 
Skutkiem tego XEB nie zajmuje wolnej pamięci RAM! 
Tak ani bitu pomiędzy MEMLO a MEMTOP Dzięki 
umiejętnemu podłączeniu się pod przerwania pracuje 
z każdym DOS-em. COS-em, XLF-em lub bez żadnego 
systemu 


10 t 

1000 

8R 

1002 

TS 

1004 

yy 

1006 

jp 

1008 

C Q 

1010 

OB 

1020 

12 

1030 

OK 

1040 

FB 

1050 

JY 

1060 

jy 

1070 

BE 

1080 

IW 

1090 

MB 

1100 

El 

1110 

HR 

1120 

DR 

1130 

GM 

1140 

DE 

1150 

8T 

1160 

BR 

1170 

DX 

1180 

DE 

1190 

BI 

1200 

YE 

1210 

AG 

1220 

BC 

1230 

ZR 

1240 

KP 

1250 

CH 

1260 

RL 

1270 

BS 

1280 

M 

1290 

BA 

1300 

BA 

1310 

HJ 

1320 

GJ 

1330 

1Q 

1340 

NR 

1350 

m 

1360 


REM *-* 

REM : XE BASIC : 

REM : autor: Tomasz Bech : 

REM : (c) 1992 Tajemnice ATARI : 

REM *-* 

DATA fff£00905790ad01d309028d01 
DATA d3a235a0904c42c6a509290lf0 
DATA 0aa50c8d0l05a50d8d0205a900 
DATA 850ca905850da9008df803a509 
DATA 090185094c7464202020584542 
DATA 61736963207665722e312e3020 
DATA 2042592054414d41535a204245 
DATA 43489be002e3020f9000900005 
DATA 7805202cc42044054c0ca02038 
DATA 054cb9a02038054c0aal203805 
DATA 4c33a248a9fd8d01d3682077b6 
DATA 202b054c62e4ad8d02ce2c05ce 
DATA 42058d01d360ee4205ee2c05ad 
DATA 01d38d8d02a9ff8d01d3606042 
DATA 5105010000000000lel1121314 
DATA 15003432lal112131415002632 
DATA 251al11211121200l0l0lal0l0 
DATA 00l0l000000000a07ea4504f44 
DATA 414a20435a41533a9bad09d2c9 
DATA Ild00dad0l05850cad0205850d 
DATA 4c74e4a98d8d42058d2c05ad0f 
DATA d22908d028a200a0a02042c6a2 
DATA ld8600204af238e920a6009d51 
DATA 05e8e02590eea91a8d7005a900 
DATA 8d73054c74e4adlfd048290l£0 
DATA 12a009a205a906205ce4a00fa2 
DATA 05a907205ce468482902f01bad 
DATA 080238e9018d68a4ad0902e900 
DATA 8d69a4a9158d0802a9058d0902 
DATA 682904£0l6a204bd6ea49dc402 
DATA cal0f7a201bd73a49dd902cal0 
DATA f7a90085088db0a0a9fd4c3405 
DATA ce64a4d03ca9328d64a4a224fe 
DATA 5l05bd5l05c91a90152003alfe 
DATA 5105bd5l05c91690082003alca 
DATA 60leb0ela21ebd5005c912900d 


BQ 

1370 

DATA 

QT 

1380 

DATA 

YR 

1390 

DATA 

SW 

1400 

DATA 

QW 

1410 

DATA 

RH 

1420 

DATA 

TH 

1430 

DATA 

FW 

1440 

DATA 

BH 

1450 

DATA 

PH 

1460 

DATA 

AW 

1470 

DATA 

cz 

1480 

DATA 

NO 

1490 

DATA 

JT 

1500 

DATA 

PF 

1510 

DATA 

CN 

1520 

DATA 

ET 

1530 

DATA 

ET 

1540 

DATA 

KH 

1550 

DATA 

GN 

1560 

DATA 

0O 

1570 

DATA 

WX 

1580 

DATA 

PE 

1590 

DATA 

NI 

1600 

DATA 

WC 

1610 

DATA 

Vfl 

1620 

DATA 

IS 

1630 

DATA 

LA 

1640 

DATA 

YL 

1650 

DATA 

LE 

1660 

DATA 

DK 

1670 

DATA 

FM 

1680 

DATA 

OE 

1690 

DATA 

MB 

1700 

DATA 

SU 

1710 

DATA 

LY 

1720 

DATA 

KL 

1730 

DATA 

MQ 

1740 

DATA 

OD 

1750 

DATA 

RX 

1760 

DATA 

TT 

1770 

DATA 

m 

1780 

DATA 

SB 

1790 

DATA 

m 

1800 

DATA 

FX 

1810 

DATA 

GX 

1820 

DATA 

HK 

1830 

DATA 

yy 

1840 

DATA 

SF 

1850 

DATA 

EW 

1860 

DATA 

SL 

1870 

DATA 

BA 

1880 

DATA 

PR 

1890 

DATA 

FV 

1900 

DATA 

YA 

1910 

DATA 

QS 

1920 

DATA 

QF 

1930 

DATA 

ES 

1940 

DATA 

PI 

1950 

DATA 

yw 

1960 

DATA 

CK 

1970 

DATA 

EH 

1980 

DATA 

GM 

1990 

DATA 

WH 

2000 

DATA 

LO 

2010 

DATA 

0Y 

2020 

DATA 

2X 

2030 

DATA 

FP 

2040 

DATA 

Vft 

2050 

DATA 

20 

2060 

DATA 

QM 

2070 

DATA 


bd5105c91490062003al2003al 
a9c048a9el484c2b05a9l09d51 
05ca60a000ce65a4d026a90c8d 
65a4ad0fd22904f0laa522c905 
d0l4a52fc99bf00ea511100aa5 
6bd006bl5e4980915ead300218 
69028d4f05ad3l0269008d5005 
a94a8d02d4a9058d03d4bl8aaa 
C8bl8aa8a9042018a4a6bca4bd 
a90d20l8a4ade50238e590aaad 
e602e591a8a9172018a4ad66a4 
f005ce66a4£036ad67a4f028ae 
fc02e8d022a0008c67a4aa2940 
f00d8a293f85afa200a9a7a0f0 
d00886afa202a9a4a09f4clb05 
a9e448a961484c2b05a9008d6d 
a48d6aa48d6ba4a000b98005c9 
9b£0348d6ca4ad6aa4ee6da4ae 
6da4186d6ca49003ee6ba4cad0 
£48d6aa438ad6aa4e9a4aaad6b 
a4e90290088d6ba48e6aa4b0ea 
C8d0c5a9008d6ca438ad6aa4e9 
Iaaaad6ba4e900900b8d6ba48e 
6aa4ee6ca4b0e7a001ae6aa48a 
69al995105ad6ca488l0f54cb0 
alad09d2c9f4d0196828a2ff9a 
d8a9a048a94c48a98d8d42058d 
2c05a9fd4c3405c9fad0646828 
d8a5l029bf85I0a903a2709d42 
03a9069d4a03a95f9d4403a9a4 
9d45032056e43027a9059d4203 
a9009d44039d4903a9049d4503 
a9 809d4803 205 6e4 3010a200a0 
042042c6a270d0d92056f5a270 
a90c9d42032056e4a510094085 
I08d0ed24c3ca28a489848ae09 
d2e0ead008ad2t0249208d2f02 
e0dbd005a9038d0fd2e0fed008 
ad02d349088d02d3e0fdd00cac 
f402ad5da48df4028c5da4e0dc 
d010ad7705492b8d7705ad6d02 
49ff8d6d02e0edd010ad780549 
34 8d7 805ad5ea44 9c08d5ea4e0 
cad00a2056f5ae09d2e0c8d0f9 
e0e5d0lfa004b9c402996ea488 
l0f7a00lb9d9029973a48810f7 
adf4028d5da44c74e48aa00588 
300ed975a4d0f8b97aa48dfc02 
4cb0alc9c0b025c90cd005a20a 
8e66a42d5ea4f017ad09d238e9 
40aabd98a3300b8d67a4a2c88e 
fC024cb0al68a868aaad69a448 
ad68a4484c2b05042bfff£ff31 
ffffl7f£2d652302ffff29£fll 
ffff2a2f40ffffffff2effffff 
ff03ff09ff6cf£3522ff0541ff 
0d3226ffffffff£fffffff080c 
01ff340a3078fffffffff£ffff 
fffff£ff££25fff£ffffff£fff 
fffffff£24f£ff64166effffff 
66fffffffflfl8ffffffffffff 
ffff76ff2c68f£7aff£ff££fff 
ff19ffffff8601840048a90085 
0485058506£8a01006012600a2 
02b50475049504cal0f788d0ee 
d868a8a200£00cb5044a4a4a4a 
0910995I05c8b5042901091099 
5l05c8e8e003d0e560e000443a 
2a2e2a010f 0000000000000000 
0a0a0006001403cecff6f7f243 
44535493 


7 








Mimo niewielkiej długości pliku mamy do dyspozycji 
wiele funkcji 

Tracę 

W dodatkowym wierszu u góry ekranu mamy ukazane: 

• aa kod kontrolny edytora baslca 

• < - numer aktualnie wykonywanej linii programu 

• tr - numer wiersza po ostatniej instrukcji trap 

• fre. - ilosc wolnych bajtów pamięci 

• 00 00 00 - zegar 

• kt podpowiedzi (k - wyłączona klawiatura t - tryb 
komend) 

Uwaga, zmiana trybu graficznego nie powoduje dez¬ 
aktywacji trybu tracę OS nie widzi dodatkowej linii' 
Komorkl 560-561 ($230-231) zawierają poprawny 
adres Ten trik wprowadziłem dlatego, ze często stosu¬ 
je się obliczanie adresu programu ANTlC-u korzystając 
z tych komórek Jako dodatek dysponujemy migają 
cym kursorem Moje rozwiązanie różni się od innych 
tym. że nic mrugają znaki w negatywie 

Tryb pamiętaj" 

Po RESET przepisywane są rejestry kolorów, repety 
cjl klawiszy. Ich wartości mogą byc zmieniane w zależ¬ 
ności od indywidualnych przyzwyczajeń 

Klawisze z SHIFT i CONTROL 

• T. i - dół góra ekranu 

• <_> - lewa, prawa krawędź ekranu 

• O - wł/wył click 

• 6 - po operacji I/O z magnetofonem wyciszenie nie¬ 
przyjemnego pisku 

• BACKSPACE - wykonanie funkcji break. Przerwa 
nie programu w basicu lub w języku maszynowym' 

• D - direetory D: * . * Wyjście do BASIC-a. 

• E - wł/wył ekran 

• G - normalny/nowy zestaw znaków 

• M - reset+zapamiętanie kolorow. repetycji, adresu 
zestawu znaków 

• P - wstrzymanie pracy procesora Działa jedynie NM1 


• O - powrót do normalnej pracy 

• S wł/wył silnik 

• T wł/wył tryb komend. Normalnie wyłączony (Włą¬ 
czony - podpowiedz w linii trace’a) 

• ESC - wł/wył klawiaturę (także podpowiedz) 

Tryb komend 

Gdy ten tryb Jest aktywny, to piszemy całymi komen¬ 
dami Dzięki wykorzystaniu tabeli nazw z BASIC-a ma¬ 
my dostępną większość funkcji i zajmujemy niewielką 
ilość pamięci Wszystkich istrukcji BASIC-a nie da się 
wypisywać, gdyż nasze ATARI ma za mało klawiszy (al 
bo za dużo komend - przyp red.) 

z SHIFT z CONTROL 


A 

— 

STICK 

4 

— 

RND 

B 

— 

PUT 

5 

— 

RETURN 

C 

— 

CLOSE 

6 

— 

CHR$ 

D 

— 

DATA 

7 

— 

LEN 

E 

— 

ENTER 

8 

— 

STRIG 

F 

— 

FOR 

9 

— 

INT 

G 

— 

GOTO 

0 

— 

PLOT 

H 

— 

GOSUB 

/ 

— 

POKE 

I 

— 

INPUT 




J 

— 

GRAPHICS 




K 

— 

LOCATE 




L 

— 

LIST 




M 

— 

PEEK 




N 

— 

NEXT 




O 

— 

OPEN 




P 

— 

POSITION 




Q 

— 

STOP 




R 

— 

READ 




S 

— 

SETCOLOR 




T 

— 

TRAP 




U 

— 

USR 




V 

— 

GET 




W 

— 

SOUND 




X 

— 

DRAWTO 




Y 

— 

THEN 




Z 

— 

STEP 




SP 

_ 

COLOR 

SP 

_ 

ASC 

RET 

— 

RESTORE 

RET 

— 

RUN 

ESC 

— 

DOS 

ESC 

— 

NEW 

CAPS 

— 

CSAVE 

CAPS 

— 

SAVE 

LOGO 

— 

CLOAD 

LOGO 

— 

LOAD 


Gorący start 

• START +RESET - wyłączenie trybu tracę. Nie działa 
wtedy tryb komend 

• SELECT+RESET - wyłączenie dodatkowych fun¬ 
kcji klawiatury. 

• OPTION+RESET - wyłączenie trybu "pamiętaj” 

• HELP+RESET - całkowita i bezpowrotna dezakty¬ 
wacja nakładki 

• SHIFT+RESET - ustawianie zegara (nie jest spraw¬ 
dzana poprawność wprowadzonego czasu) 

Myślę, ze nie powinno być kłopotów z poznaniem 

i użytkowaniem nakładki 

Tomasz Bech 
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IIOjULAZJA 

W poprzi-dnlm numcrzt TA prezeiiluwallśmy pr/ysLi 
w ki; <lo |x>nii.iru i reguLii |i li mprralury Oczywiście 
pr/i-dsIawlinU: programu sterującego w posiać I listingu 
w |c,/ykił asemblera liyło nieuprzejme woImi tyc h, klor/v 
nk posiadaj s lut) nic- lubią Quk k Assc rublem Dziś p 
i |alnl<- <lla nich łniku|< nv (ot>okl dane dLi Zgrywusa + 
(TA 1^)2) klorr [>ozw.»l ąa na u/.yskuidc samod/li liu go 
programu zdalnego do uruchomi nta |mkI komrola sysle- 
mu DOS lid) f OS Zamiast Zgrywusa ł- mo/n.i zastoso¬ 
wać Mts^-Zgrywus przedstawiony poid/c-j 


Kedaktor 


MINI 



El 10 REM Mini-Zqrywus by J.B.Wi$niewskl 
AD 15 DIM F$(120):F$="C:" 

GE 20 G=F$(1,1)="C":? "Zaczekaj..." 

ES? 25 DIM M$(8192 ,K$( 70) ,D$(30):K=1 
ZB 30 PEAD D$:D=1:H=0:TRAP 30 
0A 35 N=ASC(D$(D))-48:N=N-39*(N>9) 

Elf 40 D=D+1:X=16*X+N:H=1-H:IF H THEN 35 
ZF 45 K$(K)=CHR$(X):X=0:k=K+l 
QF 50 ON K<=70 GOTO 35:TRAP 65:M=1 
IB 55 READ D$:M$(M)=D$ 

NA 60 M=M+LEN(D$) -GOTO 55 
SW 65 M$(M)=CHR$(0) 

DG 70 M=USR(ADR(K$) ,ADR(M$)) 

XT 75 M$(M+l)="“:OPEN #1,8,128*G,F$ 

TB 80 ? #1;M$;:CbOSE #1:END 
GJ 110 DATA 686885d785dS6885d685d8a200a0 
BA 120 DATA 01ald80a0a0a0a85cbald6f01dc9 
CD 130 DATA 3a9002"907290f05cb81d8e6d6d0 
Gt, 140 DATA 02e6d78810dfe6d8d0d9e6d9d0d5 
FM 150 DATA 38a5dbe5d885d4a5d7e5d985d560 


IJ 

1000 

GA 

1002 

VJ 

1004 

YY 

1006 

JP 

1008 

VB 

1010 

IT 

1020 

OB 

1030 

HE 

1040 

CK 

1050 

MR 

1060 

UY 

1070 

WA 

1080 

WJ 

1090 

PP 

1100 

DO 

1110 

NO 

1120 

KO 

1110 

RH 

1140 

AO 

1150 

XW 

1160 

BF 

1170 

ZN 

1180 

EN 

1190 

HT 

1200 

IX 

1210 

CY 

1220 

VS 

1230 

IR 

1240 

WR 

1250 

LT 

1260 

XR 

1270 

AL 

1280 

KO 

1290 

AD 

1300 

SZ 

1310 

XL 

1320 

LO 

1330 

YS 

1340 

SR 

1350 

RP 

1360 

NJ 

1370 

FS 

1380 

KO 

1390 

BQ 

1400 

m 

1410 

RX 

1420 

AS 

1430 

JJ 

1440 

QW 

1450 

DU 

1460 

JI 

1470 

VR 

1480 

HT 

1490 

DU 

1500 


REM *- -* 

REM : Regulacja temperatury : 

REM : autor: Marek Ruta : 

REM : (c) 1992 Tajemnice ATARI : 

REM *-* 

DATA f f fi0088748aa0f1207688ad30 
DATA 028510a9878d3002ad310285f1 
DATA a9888d3102a200ad' , 0P2dd028a 
DATA f007e8e017d0f3f0ef8a0a0aaa 
DATA a000bdl98a99de88e8c8c004d0 
DATA 14a201a5f2cd7002900za2008e 
DATA 00d3aclld0c005d00f85fza200 
DATA bdae8R5dd688e8e004d0f5c006 
DATA d0b5a000207688a5f08d3002a5 
DATA t18d31026c0a00ad02d329fb8d 
DATA 02d38c00d309048d02d3607070 
DATA 704 7ae8870067070704 7d68870 
DATA 46ea8870707042le8802020202 
DATA 707070067042da894187880000 
DATA 000000''465^?6d6f 6ri6574^200 
DATA 0000000000000000252c252b34 
DATA 322f2e29233a2e390000000000 
DATA 00000000000000000000000000 
DATA 000000000000000073746f706e 
DATA 690063656c 736a75737a6 10000 
DATA 000030726f6772616d00716c75 
DATA 7a7900646t00'06f6dĆ9617275 
DATA 00690072656 1 ?56c61636a6900 
DATA 00000074656d"'065726 i 747572 
DATA 790077007a6 1 6b" ł 2657369650® 
DATA 616400111300^4610014130000 
DATA 000000007374 51706e69002365 
DATA 6c736a75737a610e003700637a 
DATA 6173696500 ’06f6d6961727500 
DATA 0000000000"76369736e696563 
DATA 6965006b6c617769737a6!000b 
DATA 33252C2523340D007061776164 
DATA 756a6500000C757374616c656e 
DATA 696500726567756C6177616e65 
DATA 6a0074656d70657261' , 4757279 
DATA 000000000000000a002d 3 20e 7 3 
DATA 6 f 667400111919110001000000 
DATA 000000000000357374616c6f6e 
DATA 610074656d 7 065726174757261 
DATA 0d6 2 7 2 61 61)0000000000000000 
DATA 090a0b0c0d0e0t101112131415 
DATA 161718191alblcldlee414130e 
DATA I013190tl513170cl5l3150el5 
DATA 13l30el513110el512190el512 
DATA 180el012160el51 2 150t-l 01214 
DATA 0el012130el0121!0el012i .’0e 
DATA 101119001011I80el01U 0el0 
DATA 11160el011150el011140el5il 
DATA 130el511130el062726f6 • 00 
DATA el020088 


Minl-Zgrywus powstał w zasadzie dla po¬ 
trzeb COS u (patrz str 16), do którego zgry¬ 
wania Jest szczególnie polecany. Został Jed¬ 
nak zaprojektowany na tyle unlwt rsalnic, żc 
można nim zgrywać wszystkie programy ma¬ 
szynowe, drukowane w 3 A w postaci wltrszy 
DATA, z wyjątkiem tych przeznaczonych na 
kasetę które wymagają przerw na inlcJalLza 
c)ę Program nie pyta o nazwę pliku Należy Ją 
przed uruchomieniem poprawló na żądaną w 
wierszu 15 Wiersze 110 150 Mlni-Zgrywusa 
zawierają dekoder danych szesnastkowych 
które muszą się kończyć bajtem CHRS(O) 


Janusz B. Wiśniewski 



skr. poczt. 702 
35-959 Rzeszów 2 


Zamawiajn nagrane na I-1 ^ asecie i 

dysku | 


programy zamieszczone 
w numerze TA 
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tafi 


Zmiana konta! PrenumeraTAl 


1 Liczba egzemplarzy 
f każdego numeru 

cena 1 
egzemplarza 

3-mles 

6-mies. 

M 1 

8 900 

26 700 

53 400 

/ 2 

8 300 

24 900 

49 800 

1 3 

8 000 

24 000 

48 000 

1 4 

7650 

22 950 

45 900 

1 5 do 9 

7 300 

21 900 

43 800 

1 10 lub więcej 

6 750 

20 250 

40 500 


W celu zamówienia prenumeraty należy wypełnić czytelnie 
blankiet wpłaty na konto (dostępny na pocztach I w bankach) 
podając na odwrocie Imię, nazwisko 1 adres zamawiającego 
oraz liczbę egzemplarzy danego numeru wraz z okresem pre¬ 
numeraty Pieniądze prosimy wpłacać; na konto; 

'Tajemnice Atarl" s.c. Rzeszów, ul. Targowa 1/801, Bank Prze¬ 
mysłowo-Handlowy Dl Oddział Rzeszów nr 326807 23650-136 
Do końca kwietnia będzie otawrte Jeszcze stare konto 
1J A W, 'ALBATROS" Pieniądze dotychczasowych pre¬ 
numeratorów zostały przekazane "Tajemnicom Atarl" 
s. c., który Jako nowy wydawca będzie zarządzał pre¬ 
numeratą. Prosimy dokonywać nowych wpłat Juz na^ 
I nowe konto bankowe 
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ATARI. COMMODORE 

• Naprawa komputerów, monitorów, peryferii, Itp 

• Montaż '1 urbo Rom do magnetofonów ATARI (Misja, Fred w 1 minucie) 

• Dystrybucja gier firm AVALON ASF1 Innych - hurt 1 detal 

• Sprzeda/ komputerów 1 oprogramowania 

Wij?" Mr*. "* 

KJRYSAL & PLUS Kraków, ul. Mochnackiego 67 
Punkty przyjęć; 

• Rzeszów, ul Rejtana 33, sklep BAJT" :{z tylu BH ”SEZAM fl i 
tel. 548-82 wieczorem 

. 

• Nowy Sącz. ul. Szwedzka 1, (Księgarnia "Eureka" w podwórzu! 

Informacje: 

• Jasło, Rynek 14, AUDIO-VlDEO "KARPATY" 

• Sanok.pl Św Michała MDK’AM1CUS’ 


USŁUGI KOMPUTEROWE 

Naprawy sprzętu 

• komputery • stacje dysków • Joysticki 

• monitory • magnetofony 

Modernizacje 

• rozszerzenia pamięci 

• TURBO do stacji dysków 1 magnetofonów 

Oprogramowanie 

Rzeszów, ul. Poznańska 2a tel. 447-20 w. 9 

Ceny ogłoszeń rarrJkowych w TA: 

• 1 cm 2 12000 

• Cała strona 6 min, + 100% za kolor 

• Ostatnia strona (kolor) 15 min 

Ogłoszenia drobne* 

• każde słowo 5 000 

dla zamawiających 
gry i programy 
w LJK.Aualon". 

W każdym numerze TA 
będzie zamieszczany 
kupon, który upoważnia 
do wzięcia udziału 
w losowaniu 

Co miesiąc 100 
szczęśliwców , 

którzy przyślą oryginalny kupon 
wraz z zamówieniem 
(spis próg omów na ostatniej stronie), 
otrzyma jedną z zamawianych pozycji 

za darmo . 

Pozostałe zamówienia będą 
realizowane u normalnym trybie. 


Termin nadsyłania zamówień 
z kuponami z numeru 3 TA 
mija 31 maja 


Redakcja Tajemnic Atarl Informuje o możliwości wysyłkowego nabywania 
wszystkich pragnimów zawartych w dowolnym numerze pisma, nagranych na kasetę 
(tylko w transmisji normalnej) lub na dyskietkę W skład zbioru wchodzą wszystkie 
listing, zamieszczone w wybranym przez Zamawiającego numerze Tajemnic. 

C( na wersji kasetowej wynosi 25 000 zł, zaś dyskowej 23 000 zł W cenę wli¬ 
czony Jest koszt nośnika, nagrania, opakowania oraz opłaty piocztowe. Same 
listingi są za darmo 

Zainteresowanych ofertą prosimy o dokładne wypełnienie zamówienia (na od 
wrorie) 1 po naklejeniu go na kartę pocztową, wysłanie na adres redakcji px> 
dany w stopKt 

Uwaga! Prosimy o nleprzysyłanie wcześniej należności będzie ona bowiem re 
gulowana przy odbiorze przesyłki 


UWAGA miłośnicy gier przygodowych 
Oryginalne poUkie programy 

SM! RFY gra tekstowa dwa razy dłuż¬ 
sza 1 ciekawsza od Mózgoprocesora 
PROFESSIONAL KILLERS 2 gra logi¬ 
czna Jesteś szefem zawodowych mor¬ 
derców ZałlJ Wałęsę. 

Wersja krążąca px) giełdach Jest nie- 
p>ełna 1 zawiera błędy 
Cena Jednej gry (kaseta/dysk) + In¬ 
strukcja 35000 

Studio Komputerowe WIZARDS 
Łódź u! Jurczyńskitgo 2827 
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W komputerach typu ATARI XL/XE zastosowano 
specjalizowany układ scalony, przeznaczony do 
sterowania wyświetlaniem obrazu Układ ten, 
o nazwie ANTIC jest specjalnie zaprojektowanym 
mikroprocesorem, pracującym równolegle z główną 
jednostką sterującą W trakcie działania, ANTIC 
korzysta z mechanizmu DMA, czyli bezpośredniego 
dostępu do pamięci przerywając pracę CPU zawsze 
wtedy, gdy potrzebuje danych do odczytu Jego 
polem działania jest cała dostępna pamięć, co 
znakomicie ułatwi pracę program isty, który nie 
musi martwić się mieszczaniem danych do 
wyświetlania w jakimś szczególnym obszarze 

Nic wdając się w szczegóły techniczne, należy zaznaczyć Je¬ 
dynie, ze ANTIC nie Jest Jedynym układem wyświetlania 
w małym ATARI Podczas pracy spełnia on jedynie funkcję za 
rządzającą, przesyłając polecenia dotyczące tworzenia obra¬ 
zu do układu GTIA GTIA dodaje Jeszcze informacje o kolo¬ 
rze oraz o tzw duszkach 1 dopiero wtedy na ekranie może 
pojawić się obraz 

Jak każdy porządny procesor, także 1 ANTIC ma własny ze¬ 
staw rozkazów, przy pomocy których możliwe Jesl napisanie 
programu wyświetlania obrazu. Taki program nazywa się 
z angielska Display List (w wolnym tłumaczeniu 'Usta wy 
śwletlanla") Kiedy restartujemy nasz komputer, system ope¬ 
racyjny tworzy podstawowy program wyświetlania, umożliwia¬ 
jąc nam kontakt wizualny z maszyną, Kiedy napiszemy w BA 
SIC u np GR.8, dajemy komputerowi (czytaj - ANTIC-owi) 
znać, ze pragniemy zmienić, sposób prezentacji danych z pa 
mięci, zgodnie z życzeniem będziemy teraz mleć do czynienia 
nie z trybem tekstowym, J.-tk zaraz po włączeniu, lecz z trybem 
graficznym Oczywiście, taką reakcję zapewnia praca Inter¬ 
pretera BASIC-u I systemu operacyjnego który tworzy odpo¬ 
wiedni program dla proce -ora graficznego 

Wszyscy wiemy. Jakie ef< kty można uzyskać, stosując BA 
SIC-owe instrukcje graficzne 1 często okazuje się, ze ten Język 
programowania nie daje nam zbyt dużych możliwości Zdarza 
się. że przestaje nam wystarczać to, eo możemy zobaczyć, 
a marzy się nam np. wyświetlenie obrazu, na którym zmiesza¬ 
no kilka trybów graficznych. I w tym miejscu warto omówić 
dokładniej program ANTIC-ui 

Program dla tego mikroprocesora stanowi"przepis'' na wy¬ 
gląd ekranu Przy pomocy pewnych rozkazów, które zaraz 
opiszę należy taki przepis utworzyć, umieścić go w pamięci 
a następnie poinformować wykonawcę zadania, czyli ANTIC 
o p>tlozenlu programu wyświetlania w pamięci Podczas pisa 
nla programu dla procesora graficznego trzeba pamiętać 
o kliku rzeczach które z punktu widzenia sprzętu są bardzo 
ważne 

Po pierwsze licznik rozkazów ANTIC-u Jest tylko 10-blto- 
wy W praktyce oznacza to ze próba napisania programu wy¬ 
świetlania którego długość Jest większa od 1 kilobajta Jest 
z góry skazana na niepowodzenie Oczywiście mam tu na my 
śll Jedynie takie programy wyświetlania które nie zawierają 
rozkazów skoków, poprzez skok bowiem możemy zmienić li¬ 
cznik rozkazów tak aby przekroczyć granicę Jednego kilobajt 


ta. Z doświadczenia mogę powiedzieć, ze raczej nie spotyka 
się programów ANTIC-u, dłuższych nlz 1024 bajty 

Po drugie licznik pamięci obrazu Jest Jedynie 12-bltowy 
co. Jak łatwo się domyślić ogranicza naszą działalność do 4- 
kilobajtowego bloku pamięci I tu jednak przychodzi nam 
z pomocą rozkaz ustawiania licznika pamięci obrazu, dzięki 
któremu można czerpać dane kolejno z kilku bloków 

Zęby powyższe rozważania nie pozostały jedynie teoria, po¬ 
wrócę do nich później, kiedy Juz zapoznamy się z rozkazami 
procesora graficznego Mamy do dyspozycji trzy grupy rozka¬ 
zów 

• rozkazy tworzące puste Unie; 

• rozkazy skoków; 

• rozkazy tworzące linie obrazu 

Rozkazy tworzące puste linie. 

Podczas wykonywania tych rozkazów ANTIC nie pobiera 
z pamięci żadnych danych Zamiast tego wyświetlane są na 
ekranie Unie w kolorze tła Ich liczba zalezy od postaci rożka 
zów, które zbudowane są następująco, 
bity 0-3 muszą mleć wartość 0, 
bity 4-6 - liczba pustych Unii zmniejszona o Jeden, 
bit 7 - żądanie przerwania (nieobowiązkowe) 

Ustawienie siódmego bitu w dowolnym rozkazie powoduje 
przerwanie programu ANTIC-u 1 wykonanie procedury której 
adres wskazuje wektor VDSLST (patrz 512, czyli S0200) Oto 
kilka przykładów rozkazów tworzących puste llnte (% ozna¬ 
cza liczbę dwójkową) 

%00100000 - wyświetlenie trzech pustyeh Unii 
%01000000 - wyświetlenie pięciu pustych Unii 


Rozkazy skoków. 

Rozkazy te powodują załadowanie licznika rozkazów AN¬ 
TIC-u adresem, zawartym w następnym słowie pamięci (młod¬ 
szy, starszy bajt adresu) Wykonanie rozkazu skoku powodu¬ 
je umieszczenie na ekranie pustej Unii stąd lepiej umieszczać 
je w programie tak aby nie wywoływały one brzydkich efe¬ 
któw wizualnych, Budowa rozkazu skoku Jesl następująca; 

bity 0-5 muszą mleć wartość %000001 

bit 6 równy zero powoduje wykonanie skoku natychmiasto¬ 
wego równy Jeden - zmusza ANTIC do oczekiwania na prze¬ 
rwanie synchronizacji pionowej przed wykonaniem następne¬ 
go po skoku rozkazu, 
bit 7 - żądanie przerwania. 

Przykłady rozkazów skoków 

%00000001 adres 1 - ładowanie licznika rozkazów wartością 
adresl 1 natychmiastowe wykonanie znajdującego się tam 
rozkazu, 

%01008001 adres2 - ładowanie licznika rozkazów wartością 

adres2 1 oczekiwanie na przerwanie synchronizacji pionowej 
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Rozkazy tworzące linie obrazu. 

Ta najliczniejsza grupa rozkazów powoduje wyświetlenie 
bloku obrazu w Jednym z kilkunastu trybów pracy AN PIC u 
Budowa tego typu rozkazówjest następująca: 

bity 0-3 numer trybu wyświetlania 

bit 4 równy Jeden powoduje włączenit poziomi go przewijania 
obrazu 

bit 5 równy Jedi n powoduje włączenie pionowego przewijania 
obrazu, 

bit 6 równy jeden powoduje załadowanie licznika pamięci ob 
razu adresem zawartym w następnym słonie pamięci i wy¬ 
świetlenie danyi h z nowego miejsca, 
bit 7 żądanie przt rwania 

W zależności od wybrani go trybu wyświetlania dane mogą 
być prezentowane j iko wiersze tekstu lub linie grafiki o roz 
nij rozdzielczości poziomej I pionowej oraz liczbie* kolorów 
Oto zestawienie trytow wyświetlania: 

Tryby tekstowe. 

Tryb 2 Odpowiada trytowi 0 BASIC u. Wiersz danych to 
40 znaków z których każdy składa się z 8 Hnll po 8 pikseli 
(punktów) Każdy z pikseli ma szerokość- pół cyklu koloru 
Wyświetlany tekst Jest dwu kolorowy 

Tryb 3 Nie ma odpowiednika w BASIC u. Wiersz danyi h 
to 40 znaków z których każdy składa się z 10 linii po 8 pl 
ksell Wyświetlany tekst Jest dwukolorowy 

Tryb 4 Nie ma odpowiednika w BASIC-u Wiersz danych 
to 40 znaków z których każdy składa się z 8 linii po 4 pikse¬ 
le Wyświetlany tekst Jest plęc iokotorowy 

Tryb 5. Jak wyżej lecz każdy znak ma 16 linii wysokości, 
ponieważ każdy piksel Jest dwukrotnie rozciągnięty w plonie 
Wyświetlany tekst Jest plęc loko loro wy 

Tryb 6 Odpowiada trybowi 1 BASIC u. Wiersz danych to 
20 znaków, z których każdy składa się z 8 linii po 8 pikseli 
o podwójnej szerokości Wyświetlany tekst jest czterokoloro¬ 
wy 

Tryb 7 Odpowi ada trybowi 2 BASIC u. Wiersz danych to 
20 znaków, z których każdy składa się z 8 linii po 8 pikseli, 
lecz piksele mają podwójną wysokość i szerokość Wyświetla¬ 
ny tekst jest czterokolorowy 

Wypada Jeszcze doda< ze teksty do wyświetlania powinny 
być kodowane niejako znaki ATASC11, lecz tzw lnternal, co 
łatwo osiągnąć w asemblerze stosując definicje typu 

tekst dta d'To jest tekst' 

(przykład w konwencji Qulek Assemblera). 

Tryby graficzne. 

Tryb 8 Odpowiada trybowi 3 BASIC u. 40 pikseli w linii 
Każdy piksel ma wysokość 8 linii obrazu 1 szerokość 4 cykli 
koloru Tryb czterokolorowy 

Tryb 9 Odpowiada trybowi 4 BASIC-u 80 pikseli w linii 
Każdy piksel ma wysokość 4 Unii obrazu 1 szerokość 2 cykli 
koloru Tryb dwukolorowy 

Tryb 10. Odpowiada trybowi 5 BASIC-u. 80 pikseli w llntt 
Każdy piksel ma wysokość 4 linii obrazu i szerokość 2 cykli 
koloru Tryb czterokolorowy 


Tryb 11 Odpowiada trybowi 6 BASIC-u 160 pikseli w 11 
nil Każdy piksel ma wysokość 2 Unii obrazu 1 szerokość 1 cy¬ 
klu koloru Tryb dwukolorowy 

Tryb 12. Nie ma odpowiednika w BASIC u. 160 pikseli 
w linii Każdy piksel ma wysokość 1 Unii obrazu 1 szerokość 
1 cyklu koloru Tryb dwukolorowy 

Tryb 13. Odpowiada trybowi 7 BASIC-u 160 pikseli w li¬ 
nii Każdy piksel ma wysokość 2 linii obrazu 1 szerokość 1 ey 
klu koloru Tryb czterokolorowy 

Tryb 14. Nie ma odpowiednika w BASIC u. 160 pikseli 
w Unii Każdy piksel ma wysokość 1 Unii obrazu 1 szerokość 
1 cyklu koloru Tryb czterokolorowy 

Tryb 15 Odpowiada trybowi 8 BASIC-u. 320 pikseli w li¬ 
nii Każdy piksel ma wysokość 1 Unii obrazu 1 szerokość pól 
cyklu koloru Tryb dwukolorowy 

Napisałem Juz wcześniej, ze licznik pamięci obrazu jest 12- 
bltowy Niedogodność tę odczuwa się podczas używania Jed¬ 
nego z dwu ostatnich trybów graficznych. Kiedy tworzymy ob¬ 
raz z dużą liczbą Unii o wysokie) rozdzielczości pamięć obra¬ 
zu Jest większa nlz 4 kilobajty W takim wypadku należy pa¬ 
miętać o ponownym załadowaniu licznika pamięci obrazu 
w środku programu ANTIC-u. Najlepiej zaplanować wyśwlet 
lanie tak aby obie części obrazu byty umieszczone na granicy 
czterokllobajtowego bloku pamięci Nie zapomnijmy o usta¬ 
wieniu szóstego bitu rozkazu wyśwli siania Unii obrazu i o po¬ 
daniu adresu danych w następnym słowie programu! 

Poziome 1 pionowe przewijanie obrazu Jest nieco zbyt skom 
plikowane aby dało się w tym miejscu opisać szczegółowo stąd 
odsyłam zainteresowanych do odpowiednie) literatury 

bity 0-3 numer trybu wyświetlania 

bit 4 równy Jeden powoduje włączenie poziomego przewijania 
obrazu, 

bit 5 równy Jeden powoduje włączei te pionowego przewijania 
obrazu, 

bit 6 równy Jeden powoduje załadowanie licznika pamięci ob¬ 
razu adresem, zawartym w następnym słowie pamięci 1 wy¬ 
świetlenie danych z nowego miejsca 
bit 7 żądanie przerwania 

Oto kilka przykładów rozkazów tworzących Unie obrazu 

%00000010 wyświetlenie wiersza ekstu w trybie 2 ANTIC-u 
%01000010 adres 1 załadowanie licznika pamięci obrazu 
wartością adres 1 i wyświetlenie znajdujących się tam danych 
Jako wiersza tekstu w trybie 2 ANTIC-u 
%00001111wyświetlenie wiersza grafiki w trybie 15 ANTIC-u 


S0230,$0231 00560,00561 SDLSTL 

To słowo pamięci zawiera adres programu wyświetlania, 
skonstruowanego w oparciu o podane wyżej zasady I umiesz¬ 
czonego na granicy Jednokilobąjtowego bloku pamięci Inicjo¬ 
wane przez system podczas restartu komputera Przy zmianie 
adresu programu ANTIC-u warto pamiętać o odtworzeniu 
starej wartości na zakończenie programu. 


Jarosław Syrylak 
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Na temat samouruchamlania programów odczytywa- 
nych z taśmy magnetofonowej pisano Juz nieraz (tema¬ 
tem tym zajmował się zwłaszcza "Baj tek"). Wszystkie 
rozwiązania jednak zakładały albo wczytywanie pro¬ 
gramu Basic "Bootem" albo tez zamiast Instrukcji 
LOAD/RUN używano krótkiej procedurkl maszynowej. 
Cały problem tkwi, jak wiadomo, w specyfice Interpre- 


IJ 

1000 


1002 

QV 

1004 

YY 

1006 

JP 

1008 

DL 

1010 

KZ 

1020 

PL 

1030 

TH 

1040 

Ot 

1050 

EU 

1060 

ET 

1070 

XI 

1080 

LE 

1090 

DK 

1100 

KB 

1110 

S8 

1120 

8T 

1130 

XL 

1140 

HU 

1150 

FK 

1160 

IU 

1170 

BV 

1180 

CI 

1190 

OZ 

1200 

TL 

1210 

ZX 

SI 

1220 

1230 

MK 

1240 

KH 

1250 

N(2 

1260 

YJ 

1270 

VG 

1280 

DC 

1290 


REM *-* 

REM : RAM-BASIC : 

REM : autor: Maciej Czarnota : 

REM : (c) 1992 Ta 3 emnice ATARI : 

REM *-* 


DATA ffff00905c92a2b9a0902042c6 
DATA adf803f00aa2e6a0902042c668 
DATA 6860ad01d3c9fdf00ca2d6a090 
DATA 208f90207190d0eaa9a085cca9 
DATA 7085ce207890a9ff8d01d3a970 
DATA 85cca9a085ce207890ade70218 
DATA 694d8d70bb8d01bbade8026900 
DATA 8d71bb8d02bba2dba090208f90 
DATA a201b50c9d0291bde702950cca 
DATA 10f3a2fca0904c42c6a00084cd 
DATA 84cba21£blcb91cdc8d0f9e6cc 
DATA e6cecal0f2602042c6a9058d42 
DATA 03a9028d4803a2008e4903a905 
DATA 8d4503a9808d44032056e4ad80 
DATA 05c99bf0038d3fb36052414d42 
DATA 41532076657220332e30206279 
DATA 204d2e437a61726e6f74619b4e 
DATA 6f77792070726f6d7074203f3f 
DATA 3f9b4e6965206d612041746172 
DATA 692042617369632021219b4f2e 
DATA 6b2e9b200191adlfd0c903d02e 
DATA ad6f91c50cd01ead7091c50dd0 
DATA 17ad0?91850cad0391850dad6f 
DATA 918de702ad70918de80260ae6d 
DATA 91ac6e912042c6ad6b918de702 
DATA ad6c918de802a9ff8d01d3a902 
DATA 8dc802 604 8a007 84c120afbca9 
DATA 0c202bbda00384c068a0802002 
DATA bca90760009291739101910000 


EB 

1300 

DATA 


1310 

DATA 

YY 

1320 

DATA 

SJ 

1330 

DATA 

AG 

1340 

DATA 

PM 

1350 

DATA 

W 

1360 

DATA 

xi 

1370 

DATA 

SO 

1380 

DATA 

BY 

1390 

DATA 

PG 

1400 

DATA 

NP 

1410 

DATA 

JA 

1420 

DATA 

TK 

1430 

DATA 

PJS 

1440 

DATA 

m 

1450 

DATA 

m 

1460 

DATA 

RC 

1470 

DATA 

tw 

1480 

DATA 


4e6965206d6f6765206f64696e 
7374616c6f7761632052414d42 
415341219b00200090a9608d93 
91a90085cfade70285d4ade802 
85d538a90185d2e5d485d0a991 
85d3e5d585dla000f0033866cf 
a5d2c993a5d3e9919014ade702 
1869038d0070ade80269008d01 
706c007024cf70633027bld285 
ce91d4205092aaf0cdc920f017 
C940f0c8c960f0c4290dc908f0 
be90418a291fc909f03abld2c8 
c901bld288e9919012bld2c8c9 
93bld288e991b006a5d0a6dl90 
0724cf3090a900aa85d686d738 
bld2e5d691d4205092bld2e5d7 
4c4892bld291d42050924ccl91 
e6d2d002e6d3e6d4d002e6d560 
e002el029391 


tera Języka Basic, któiy rozkazem SAVE zapisuje pro¬ 
gramy wyłącznie z długimi przerwami mlędzyblokowy 
ml - 1 tylko takie potrafi odczytać przy pomocy RUN 
1LOAD 

Chcąc temu Jakoś zaradzić napisałem programik 
RAMBAS’ (listing nr 1) Dokonuje on zmiany w Inter¬ 
preterze Baslcu, pozwalając Instrukcjami SAVE, RUN 
1 LOAD zapisywać 1 odczytywać dane z krótkimi prze¬ 
rwami mlędzyblokowyml. Działanie jego jest proste - 
Interpreter Baslcu przepisywany jest z ROM do RAM. 


ZM 0 REM *-,-* 

EE 2 REM : Krótkie przerwy w SAVE/LOAD : 

PM 4 REM : autor: Maciej Czarnota : 

BJ 6 REM : (c) 1992 Tajemnice ATARI : 

AF 8 REM *-* 

XX 10 U=1536:A=U:TRAP 30 

ci 20 READ B:POKE A,B:A=A+1:GOTO 20 

GE 30 A=USR (U) 


DJ 110 DATA 104,169,160,133,204,169,112 
JP 120 DATA 133,206,32,45,6,169,255,141 
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AQ 130 DATA 1,211,169,112,133,204,169 
BO 140 DATA 160,133,206,32,45,6,169,68 
00 150 DATA 141,112,187,141,1,187,169,6 

OJ 160 DATA 141,113,187,141,2,187,96,160 
QA 170 DATA 0,132,205,132,203,162,31,177 
AC 180 DATA 203,145,205,200,208,249,230 
YP 190 DATA 204,230,206,202,16,242,96,72 
TT 200 DATA 160,7,132,193,32,175,188,169 
BA 210 DATA 12,32,43,189,160,3,132,192 
MJ 220 DATA 104,160,128,32,2,188,169,7,96 

po czym dokonywane są w nim niezbędne zmiany. 
Standardowy Interpreter Jest odłączany (poprzez usta¬ 
wienie bitu 1 w komórce PORTB - 54017) W związku 
z tym. po uruchomieniu programu, należy uważnie po¬ 
sługiwać się Instrukcją POKE, bowiem obszar lnterpre 
tera ($A000-$C000) nie Jest Juz chroniony przed zmla 
nami 

Program nr 1 Jest przeznaczony dla osob posługują¬ 
cych się COS-em 1 programami mu podobnymi. Powi¬ 
nien byc używany jako komenda zewnętrzna. Po wczy¬ 
taniu (oczywiście musi byc podłączony Interpreter Ata 
rl Basic) program zadaje pytanie "Prompt ???" Użyt¬ 
kownik ma w ten sposob możliwość zmiany znaku za¬ 
chęty (prompt) - pytajnik bowiem, z niewiadomych 
przyczyn, niektórym osobom nie odpowiada Jako od¬ 
powiedz wystarczy podać nowy znak (np #) Naciśnię¬ 
cie "pustego" klawisza RETURN powoduje pozostawie¬ 
nie poprzedniego znaku 

Po tym program samoczynnie umieści się nad MEM- 
LO, "uodporni” na Reset 1 przekaże sterowanie do COS 

od tej chwili będzie stale rezydował w pamięci Swą 
obecność sygnalizuje podwyższoną Jasnością ramki ob¬ 
razu Jeżeli Jednak ktoś zapragnie powrocie do stan¬ 
dardowego Interpretera - wystarczy po prostu nacis¬ 
nąć Jednocześnie RESET 1 OPTION Atarl Basic zosta 
nie podłączony, a ramka ekranu znów będzie miała 
normalny, czarny kolor Programu wszelako nie da się 
odlnstalować. Jeżeli po nim uruchomiono Jeszcze Inne 
nakładki (np XLF a) I Jeszcze jedno gdy znudzi nam 
się nowy prompt - wystarczy Jeszcze raz uruchomić 
RAMBASa - program zapyta nas wtedy o "Nowy 
prompt”. Postąpić wtedy należy tak jak przy urucha¬ 
mianiu programu 

Program nr 2 Jest propozycją loadera programów 
Basic wykorzystującego przedstawioną wyżej technikę. 
W liniach DATA zawarta jest nieco uproszczona wersja 
RAMBASa - nlerelokowalna, nieodporna na Reset, 
Prompt można zmienić Jedynie Instrukcją 

POKE 45887,ASC('?') 

zamiast pytajnika wstawiając nowy znak zachęty 

Wszystkim zainteresowanym działaniem programu po¬ 
lecam samodzielną Jego analizę połączoną z lekturą 
książki Wojciecha Zientary "Mapa pamięci Atarl XL/XE - 
procedury Interpretera Baslca” wydanej przez SOETO 



Podobno karzeł Aldir przez Twoje nieudacznlctwo 
Jest Jeszcze ciągle uwięziony w zamkowej wieży? No 
nie... Juz czas go wypuścić! Od czego są ZAPAŁKI - 
podnieś pudełko, stan w pobliżu drzwi 1 użyj Ich - sta¬ 
re, spróchniałe drewno nie oprze się niszczycielskiemu 
działaniu ognia 1 karzeł będzie wolny! Co dalej? Przede 
wszystkim oczyść pomieszczenie z latających wkoło de¬ 
monów - tylko dobry "autoflre” poradzi sobie z tym 
w zadowalającym czasie. 

Nie wiesz Jak dostać się do czarnoksiężnika? Za wy¬ 
soko? No coz, od tego właśnie Jest DRABINA - znajdź 
obie jej części, które zaśmiecają gdzieś korytarze 
(patrz mapa) 1 uzy] Ich przy wschodniej baszcie (czyli 
przy tej po prawej stronie) Jak Juz wdrapiesz się na 
górę 1 spotkasz czarnoksiężnika, wręcz mu szesc 
składników magicznego napoju (w tym zamku koryta¬ 
rzy nie sprzątano Juz od lat - składniki te tez gdzieś 
tam się poniewierają) W zamian za to otrzymasz ZŁO¬ 
TY KLUCZ, który umożliwi Cl zdobycie ostatniego 
z pięciu mleczy. 

Jeśli gdzieś w podziemiach natkniesz się na kamien¬ 
ną ścianę (a Juz ktoś się o to postarał, abyś się na¬ 
tknął), użyj TNT. Tylko pamiętaj, ze Jest on nie do od¬ 
palenia bez DETONATORA Przez dziurę powstałą 
dzięki wysadzeniu trotylu dostaniesz się do krypty, 
w które] spoczywają zwłoki wampira oraz Jego sztucz¬ 
na szczęka (o wartości nie mniejsze] nlz oryginalne ZĘ¬ 
BY WAMPIRA) Jeśli zagłębisz się dalej w podziemia, 
trafisz do lasu otaczającego Helgor. 

Warto, abyś wiedział o paru rzeczach. 

• Jedynie dobry AMULET pozwoli przejść bezboleśnie 
przez KOMNATĘ DUCHÓW 

• KARTY DO TAROTA znakomicie nadają się do 
wszelkiego rodzaju wróżb 

• trolle to gatunek uwielbiający wilgotne lochy, ob¬ 
rzydliwe rozrywki oraz PIWO 

• wszystkie magiczne stwory najbardziej ze wszystkie¬ 
go nie znoszą SREBRA 

• aby nie zostać spopielonym przez smoka, osłon się 
TARCZĄ 

• zapach CZOSNKU od wieków uważany Jest za sku 
teczny środek odstraszający wilkołaki 1 wampiry 

Pytania, Jak otworzyć trumnę, co można znalezc 
w samotnym groble oraz jakie tajemnice kryje las, po¬ 
zostawiamy bez odpowiedzi - to Ty jesteś odkrywcą 
1 to są Twoje przygody 


B&C TEAM 


Maciej Czamota 
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Miecze Valdgira” to przygodowa gra, z którą nasi 
czytelnicy zdązyll się juz chyba zaznajomić Jej bohate¬ 
rem jest nlerozgarnlęty karzełek Aldlr, który nleroz 
ważnie dał się uwięzie w mrocznym, pełnym czarów 
zamczysku. Należy pomoc biedakowi wydostać się 
stamtąd, a 'przy okazji" pokonać magiczne moce pu 
stoszące rozciągającą się wokoł zamku krainę 

Zadanie czekające gracza nie jest proste Zamek 
Heldgor to prawdziwy labirynt korytarzy rozciągają 
cych się na wielu poziomach Latają tam najróżniejsze 
paskudne stworki-uplorki, które dosc skutecznie po 
trafią przeszkodzie naszemu bohaterowi Na szczęście 
posiada on do dyspozycji płomienny wzrok Aldlra 1 je¬ 
żeli tylko graczowi dopisze refleks, to zamkowe stra 
szydła nie pokonają go tak łatwo Powinien on także 
wiedzieć, ze czający się w podziemiach troll jest wlel 
kim amatorem piwa, zas mieszkający samotnie w wie 
zy stary czarnoksiężnik jest gotow wiele dac za szesc 
składników magicznego napoju 

Korytarze 1 lochy zamku pełne są rozmaitych przed¬ 
miotów, które mogą okazać się przydatne w dalszej wę 
drowee, nie należy więc lekceważyć nawet najbardziej 
dziwacznych znalezisk Pamiętajmy, ze miejscem tym 
rząd/ą siły czarnej magli Graczowi potrzebna jest tez 
dobra orientacja w ternie Łatwo bowiem zgubie drogę 
i stracie wiele czasu błądząc w skomplikowanym labi 
ryncie korytarzy 

"Mlecze Valdglra”, to gra fantasy, która z pewno¬ 
ścią podoba się miłośnikom zagadek, tajemniczych 
k imał, mrocznych czarów 1 powieści R R Tolkiena 
S/koda, ze grafika nie jest tu bardziej urozmaicona - 
korytarze na wszystkich poziomach zamku są do sie¬ 
bie nużąco podobne Natomiast na duże pochwały 


zasługuje postać karzełka Aldlra, wykonana bardzo 
ładnie 1 budząca sympatię. Niestety pozostałe pojawia¬ 
jące się postacie są narysowane w sposob nieco mniej 
atrakcyjny Na szczęście jednak te drobne mankamen 
ty nie przeważają nad zaletami gry, dlatego tez możemy 
zapewnie, ze dostarczy ona graczowi wiele dobrej roz¬ 
rywki 


Firma ''ASF" dostarczyła nam także nową, bardzo Inte¬ 
resującą grę o nazwie "Kult" Jej akcja rozgrywa się 
w tragicznym dla ludzkości momencie - z prowadzącego 
tajemnicze badania Instytutu wydostają się odrażające 
potwory Nazwano je owocami wynaturzonego kultu na 
ukl, który obroclł się przeciwko swym wyznawcom. Sta¬ 
nowią one śmiertelne zagrożenie dla wszystkich żyjących 
na Ziemi istot W obliczu zagłady zdecydowano wysłać 
przeciwko mutantom supernowoczesny helikopter, na 
pokładzie ktorego znajduje się najlepszy pilot wszechcza¬ 
sów - w jego rolę wciela się uczestnik gry Czy zdązy on 
ocalic świat przed atakiem krwiożerczych potworowi 

"Kult”, to niesłychanie emocjonująca 1 wciągająca 
gra Jej uczestnikowi potrzebny jest przede wszystkim 
doskonały refleks, nie zaszkodzi tez umiejętność pano 
wania nad sobą (tzw zimna krew), ponieważ poniesio¬ 
ny emocjami gracz łatwo może utracie joystick Ataku¬ 
jące dzielnego pilota potwory poruszają się bardzo 
szybko, lecą w zmieniającym się szyku 1 pojawiają się 
znienacka Na szczęście w grze Istnieje ułatwienie 
w postaci wyświetlacza, który pokazuje w jaki sposob 
gracz zostanie zaatakowany. Istnieje ponadto możli¬ 
wość zdobywania rożnego rodzaju broni i wykorzysty 
wania jej w zależności od stopnia zagrożenia 

Gra posiada kilka etapów, zróżnicowanych pod 
względem trudności. Z całą pewnością dostarczy ona 
naszym czytelrtkom wiele dobrej zabawy 1 wielu wra¬ 
żeń Gracz ina tu do czynienia z prawdzwle trudnym 
zadaniem, ktorego wykonanie sprawi mu dużą satysfa 
keję Dodatkowymi atutami "Kultu" jest także ładna 
i dopracowana grafika oraz niezła muzyka Wszystko 
to uprzyjemnia grę 1 sprawia, ze poszczególne plansze 
nie męczą oczu 1 nie wywołują odczucia monotonii Ste¬ 
rowanie helikopterem wymaga sporej koncentracji, 
jednak Istnieje możliwość włączenia przerwy w grze. 
Można wtedy złapać oddech 1 dac odpocząć joysticko¬ 
wi Grę polecamy wszystkim tym, którzy lubią postrze¬ 
lać i potrenować refleks Na pewno nie poczują się za¬ 
wiedzeni, gdyż potwory stworzone przez "Kult" są na 
prawdę groźnymi przeciwnikami 

BASIA 



Obie gry można nabyć wysyłkowo w firmie L.K. "Avalon" 
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Na co mi to? 

Kiedy komputerowy neofita przebrnie już przez 
okres pierwszyeh trudności (eo odpowiedzieć, kiedy on 
do mnie READY" ?). a także przez okres pierwszyeh fa- 
seynaeji (gdyby robili trochę mocniejsze joysticki, do¬ 
tarłbym do setnego mostu!), próbuje zwykle wykorzy 
stać swą maszynę w sposob nieco ambitniejszy, bar 
dziej twórczy. 1 tu posiadacz "pamięci taśmowej’' staje 
przed problemem O ile większość gier istnieje w wer¬ 
sjach dyskowych i kasetowych, to prawie wszystkie 
programy użytkowe są przeznaczone dla posiadaczy 
stacji dysków Byc może wynika to z faktu, ze wię¬ 
kszość zawodowych programistów pamięta magneto¬ 
fon tylko jako podstępnego wroga z wczesnego dzieciń¬ 
stwa i nie traktuje poważnie tego typu painięei zewnę¬ 
trznej. 

Dawniej, to znaczy przed powstaniem COS-u pro 
gramy nagrane na kasecie uruchamiane były przez wy¬ 
łączenie komputera i ponowne włączenie go Taka me 
loda ma szei eg poważnych wad 

Po pierwsze włączanie i wyłączanie stanowi poten¬ 
cjalne zagrożenie dla układów komputera 90% wszy 
stkich uszkodzeń zdarza się w tych momentach 

Po drugie na skutek wyłączenia zasilania znika wszy¬ 
stko, co dotąd siedziało w pamięci komputera. RAM 
dysk, rezydentny sterownik złącza "Centronics", staran¬ 
nie ustawiona data i czas 

Po trzecie dyskowe programy binarne mają inną 
strukturę niz kasetowe, a więc nie jest możliwe bezpo 
średnie ich przenoszenie: stosuje się niezbyt wygodny 
"wykrzyknik", który trzeba dołączać przed każdym pro¬ 
gramem. 

COS Jest takim właśnie "wykrzyknikiem”, lecz uru¬ 
chamianym tylko raz dziennie 1 Jest on funkcjonalnym 
odpowiednikiem dyskowego DOS u i podobnie jak on 
umożliwia uruchamianie programów, zwłaszcza uzyt 
kowych, traktowanych jak dodatkowe (zewnętrzne) po 
lecenia COS-u. COS Jest stale obecny w pamięci kom 
putera i pozwala wielokrotnie uruchamiać i opuszczać 
różne programy a także interpreter BASICu Stanowi 
on dodatkowy "pomosl" między użytkownikiem a kom 
puterem Pozwala instalować programy rezydentne, 
czyli tzw nakładki, jak na przykład RamFile z TA 8/91, 
XE Basic (przedstawiony w tym numerze), XLFriend 
(edytor tekstów, tabela kodow, kalkulator i monitor pa¬ 
mięci), wchodzący w skład pakietu Quick Assemblera 
i wiele, wiele innych, by moc korzystać z nich przez 
długi czas, podczas działania różnych programów. 

COS dość wiernie udaje DOS. zatem większość pro¬ 
gramów dyskowych skopiowanych na taśmę dowolnym 


kopierem będzie się uruchamiać pod COS em bez kło¬ 
potu Dedykowany kopicr NaineCopy (drukowany w TA 
2/91) pozwala ponadto na przekazywanie na kasetę 
także nazw programów dyskowych oraz wydłuża nie¬ 
kiedy przerwy między blokami dla potrzeb procedur 
inicjalizacji (gdy są). Sposob działania obsługa se¬ 
kwencji RESET, uruchamianie programów wiernie na¬ 
śladuje DOS, może być dobrym ćwiczeniem dla użyt¬ 
kownika ATARI przed planowanym zakupem napędu 
dysków 


IJ 

JO 

YM 

YY 

JP 

YQ 

JD 

VB 

BE 

WO 

LC 

AV 

Ol 

WN 

Fł) 

VA 

CM 

XO 

NO 

GO 

YA 

HH 

NW 

LL 

MB 

ZJ 

AB 

RF 

BK 

VQ 

PS 

TS 

DY 

QB 

SB 

DM 

FM 

L0 

ZY 

UH 

TI 

CA 

DY 

OU 

KZ 

RZ 

NT 

¥E 

EK 

NW 


1000 REM *---* 

1002 REM : COS wersja 1.4 : 

1004 REM : Janusz B. Wi$niewski : 

1006 REM : (c) 1992 Tajemnice ATARI : 

1008 REM *-* 


1010 DATA 000b00078507a9ba850aa90885 
1020 DATA 0ba93e850ca908850da0008c44 
1030 DATA 02c8840984ca4c74e4202a0730 
1040 DATA 5d8548a9009d48039d49034c56 
1050 DATA e4854320230730498545254849 
1060 DATA fff0fla5488544202307303885 
1070 DATA 47a5488546a5449d4403a5459d 
1080 DATA 450338a546e544a8a547e54518 
1090 DATA C8d00269019d4903989d4803a5 
1100 DATA 44c9c0d008a545c901d002f001 
1110 DATA 18a0016020820a20a509306620 
1120 DATA 3507 3061a543d05b202d08e6ca 
1130 DATA eec608d011a210203507100ac0 
1140 DATA 88d04820840a6ce002a9858de2 
1150 DATA 02a9078de302082056e4289830 
1160 DATA 309019a55ee9288548a55fe900 
1170 DATA 8549a010b9be01206c09914888 
1180 DATA 10f520ef07a001b9e002990407 
1190 DATA 8810f730b26ce202a0af844320 
1200 DATA 840aa90085448545f8a0070643 
1210 DATA a5446544854426458810f3d8a9 
1220 DATA f28548a90b8549a00da544207b 
1230 DATA 09a545208409a9f2a00ba2114c 
1240 DATA 6f08a9858de0028d0407a9078d 
1250 DATA el028d050760a9f88de702a90c 
1260 DATA 8de802a92e8d0602a9098d0702 
1270 DATA a9148dd902a9038dda02adf803 
1280 DATA f0cc208508a9608d6408a916a0 
1290 DATA 0ca23a8d44038c45038e4803a2 
1300 DATA 008e4903a90b8d42034c56e4a2 
1310 DATA 23a00e209908a95ba00ba22520 
1320 DATA 6f08a223a00d84438600a02020 
1330 DATA ad08a44320ad08c600d0f7a09b 
1340 DATA ad470348ad460348986020df0a 
1350 DATA d858a2ff9a8efc02e88642a901 
1360 DATA 85ca8ec60820ee0930e9a000ad 
1370 DATA 800cc93ed001c820620930da84 
1380 DATA 0020e708b0d018a98065008548 
1390 DATA a90c69008549a200a000e02db0 
1400 DATA bbbl48dd510cd016e8c8c00390 
1410 DATA f3bl48c99bf004c920d0062021 
1420 DATA 094cba08e8c8c00590fab0d5bd 
1430 DATA 510c8548bd520c85496c4800d8 
1440 DATA 586868a9e485.48a90b8549a00b 
1450 DATA 3868e90208207b092868e90020 
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UD 1460 DATA 7b09a9e4a00ba20f206f084cba 
VW 1470 DATA 08c8b9800c3005c920d0f6c8b9 
ŁX 1480 DATA 800cc920f0f8c900600a08c9c0 
WX 1490 DATA b006e93fb00269c0286a604820 
DK 1500 DATA 8409684a4a4a4a290f0930c93a 
ŁH 1510 DATA 9002690691488860a20020840a 
DE 1520 DATA a9049d4403a90c9d4503a90cd0 
SX 1530 DATA 17a011b9050c99be018810f7a9 
ZQ 1540 DATA 039d4403a90c9d4503a904489d 
KY 1550 DATA 4a03a9039d4203a9809d4b0320 
QX 1560 DATA 56e46809039d42039860a201b9 
IY 1570 DATA 800cc94fd00bb9810cdd7e0cf0 
KF 1580 DATA 05cal0f538608al860a200a90b 
W 1590 DATA 9d4203a94f9d4403a90c9d4503 
ET 1600 DATA a9029d4803a9009d49032056e4 
BI 1610 DATA a9059d4203a9809d4403a90c9d 
OY 1620 DATA 4503a9789d4803a99b8d830c20 
BP 1630 DATA 56e4bd800cc99bf012297fc961 
BK 1640 DATA 9006c97bb00249209d800ce8d0 
MY 1650 DATA e79860a980a00ba22f206f08a0 
1.C 1660 DATA 2020ad08a20fa0122099082082 

XN 1670 DATA 0a20250b20a509301820350730 
IR 1680 DATA 1390052056e4300ca9bea001a2 
AN 1690 DATA 12206f084c580ac080f0054cf4 
* OK 1700 DATA 07a210a90c9d42032056e4a903 
KU 1710 DATA 8d0fd260c9309012c93a900ac9 
JF 1720 DATA 41900ac947b006e906290f1860 
CO 1730 DATA 3860a400205809302bb9800c20 
ZF 1740 DATA 920ab026a90085488549b9800c 
MX 1750 DATA 20920a90036c4800a204064826 
FK 1760 DATA 49b00dcad0f705488548c8d0e3 
QI 1770 DATA 6c0407a9afa00ba2174c6f08a4 
¥B 1780 DATA 00205809300f20d509b0eb85ca 
JV 1790 DATA 49018df8034c74e4adf803d006 
JD 1800 DATA 202d086cfabfa9c6a00ba20£4c 
OH 1810 DATA 6f08a40020580920d509b0c3d0 
BR 1820 DATA 07ad02d30908d005ad02d329f7 
CZ 1830 DATA 8d02d360a9d58548a90b8549a0 
FJ 1840 DATA 0eade502207b09ade602207b09 
EV 1850 DATA a006ade702207b09ade802207b 
CG 1860 DATA 09a9d5a00ba2104c6f0820164a 
ŁT 1870 DATA 425720436l737365747465204f 
10 1880 DATA 7065726174696e672053797374 

22 1890 DATA 656d20312e34029b526577696e 

m 1900 DATA 642066696c65732c99c2d2c5cl 
QY 1910 DATA cbl9746f2073746f709b9b2020 
UT 1920 DATA 6e616d6520202020657874206c 
CT 1930 DATA 656e9b53796e74617820657272 
EJB 1940 DATA 6f7221fd2054727920484c509b 
BH 1950 DATA 4e6f2063617274726964676521 
YW 1960 DATA fd9b4c6f3d2e2e2e2e2048693d 
AU 1970 DATA 2e2e2e2e9b42524b206174202e 
ZC 1980 DATA 2e2e2e21fd9b492f4f20657272 
QA 1990 DATA 6f72202e2e2e2Ifd9b43452020 
BE 2000 DATA 3f3f3f3f3f3f3f3f3f3f3f203f 
2010 DATA 3f3f9b2a2a9b434152205b4f4e 
XS 2020 DATA 7c4f46465d9b434c539b444952 
MM 2030 DATA 9b484c509b4d454d9b4d4f5420 
WV 2040 DATA 4f4e7c4f46469b52554e205b68 
ŁL 2050 DATA 65785d9b5645529b3e44495243 
SD 2060 DATA 0a52554eaa0a56455285084341 
QC 2070 DATA 52e80a434c539209484c506908 
BF 2080 DATA 4d454d2e0b4d4f54120b2a2a9b 
YZ 2090 DATA 8607464e 

w - ■ ■ ■ ■ ■ ■ ■'* ■ * ■ n~ ■ ■ 

m SiiSSiffitSSi: te 
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Co z tym zrobić? 

Aby otrzymać zdatny do uruchomienia COS należy 
przepisać dwie części programu generującego, to Jest 
Mini Zgrywus, znajdujący się na str 9 oraz dane wła¬ 
ściwego COS-u (powyżej) Można je przepisać razem, 
jako jeden program, lub osobno, a później scalić, uży¬ 
wając rozkazów LIST 1 SAVE. Całość po uruchomieniu 
przez RUN nagrywa COS na taśmie w postaci pliku 
f boot\ 


I co dalej? 

Dla wczytania COS-u, należy włączyć komputer przy 
wciśniętym klawiszu START. Jeżeli dodatkowo będzie 
naciśnięty OPTION, to Interpreter BASIC-a zostanie 
wyłączony (powiększy się za to rozmiar wolnej pamię¬ 
ci) Jeżeli klawisz OPTION nie Jest naciśnięty, to COS 
zaraz po wczytaniu przekaże sterowanie do BASIC-a 
Można jednak do niego zawsze powrócić rozkazem 
DOS (nie COS 1 ) Nie ma tez powodu, by się bardzo 
przejmować klawiszem OPTION Przy pomocy COS-u 
można włączac 1 wyłączać BASIC zależnie od potrzeb 

COS wyświetla znaczek ">", co oznacza stan oczeki¬ 
wania na polecenie użytkownika. Można wówczas 
wprowadzić dowolne z poleceń wewnętrznych, lub parę 
gwiazdek ("**"). co spowoduje wczytanie 1 uruchomie¬ 
nie programu z kasety Takim programem może być 
np QA, NCOPY, PE. CZYTAJ . Ich Usta Jest nieograni¬ 
czona Jeśli program był kopiowany przy użyciu NCo- 
py, to podczas wczytywania COS wyświetli Jego nazwę 
1 wielkość liczoną w blokach. Każdy taki program moż¬ 
na rozumieć jako dodatkowe, zewnętrzne polecenie 
COS u 
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Opis poleceń wewnętrznych: 

• DIR - spis zawartości kasety Należy przewinąć ta¬ 
śmę na początek niewiadomego programu, włączyć 
"PLAY” w magnetofonie 1 jednocześnie wclsnąc jakiś 
klawisz komputera. Po odczytaniu pierwszego bloku 
programu COS wyświetli jego nazwę (name), rozsze¬ 
rzenie (ext) 1 długość (len), o ile zostały wprowadzo 
ne przy użyciu NCopy W przeciwnym razie pojawi 
się ciąg znaków zapylania. Należy potem odszukać 
początek następnego nieznanego programu, itd Po¬ 
szukiwania ułatwia stale włączony, podczas opera¬ 
cji DIR, silnik magnetofonu Zakończenie polecenia 
- klawiszem BREAK 

• MEM - aktualny rozmiar wolnej pamięci COS wy 
świetla dolną (Lo) i górną (HI) granicę nieużywanej 
pamięci Liczby podane są w notacji szesnastkowej 

• CAR - obsługa wbudowanego BASIC-u Bez para¬ 
metru powoduje przejście do interpretera BASIC-u, 
o tle jest on włączony. Z parametrem ON - włącza 
BASIC nawet, jeśli podczas startu komputera wciś¬ 
nięty był klawisz OPTION Z parametrem OFF wyłą¬ 
cza BASIC 

• RUN - uruchomienie programu w pamięci Rozkaz 
ten bez parametru powoduje uruchomienie ostatnio 
wczytywanego polecenia zewnętrznego Z parame¬ 
trem, którym musi byc adres w notacji szesnastko¬ 
wej, uruchamia program drzemiący w pamięci ope¬ 
racyjnej od podanego adresu Dla przykładu RUN 
E477 spowoduje "zimny start" bez potrzeb\ wyłącza¬ 
nia komputera 

• MOT - sterowanie silnika magnetofonu Z parame¬ 
trem ON włącza silnik magnetofonu, a z parame 
trem OFF wyłącza go 

• VER - wyświetlenie nagłówka COS z numerem wer- 
sji. 

• CLS - wymazanie zawartości ekranu 

• HLP - wyświetlenie listy rozkazów wewnętrznych 

W opisie składni rozkazów, pojawiającym się po 
HLP, dużymi literami zapisano te elementy, które nale¬ 
ży przepisać tak, jak podano Nawiasy kwadratowe 
otaczają element, który można pominąć. Kreska piono- 
wa dzieli elementy, sposrod których trzeba dokonać 
wyboru Napis złozony z małych liter należy zastąpić 
stosownym parametrem 

Polacy gęsi? 

Od czasu do czasu otrzymuję listy na dyskietkach 
lub kasetach, których autorzy usprawiedliwiają się nie 
używam polskich liter bo to trudne Albo bo mi się nie 
chciało Albo bo nie umiem Szczególnie irytująca jest 
argumentacja bo 1 tak każdy zrozumie Ponieważ 
z rozpaczy brakuje mi juz słów, przytaczam zasłyszaną 
ripostę 'Po co polskie znaki, przecież gdy program pi 
sze ŁADOWANIE DANYCH, każdy rozumie, ?e chodzi 
o LĄDOWANIE" 


Polski Edytor 

Prezentowany poniżej mini edytor stanowi drobny 
krok w kierunku "odgęsienla” polskich tekstów Pozwa¬ 


la on uzyskać małe polskie litery przy użyciu klawisza 
CONTROL (tu oznaczanego jako "~"). 


ą - '•a. 
ć — 'c 
ę - "e 


ł - ~1 
ń — 

6 — 'o 



" s 
'z 


U 

61 

YM 

YY 

jp 

VL 

EJ 

pc 

BK 

AL 

*8 

ŁL 

JW 

OD 

WD 

EC 

OM 

JM 

VF 

FG 

OD 

Z« 

&* 

MJ 

vz 

JE 

01 

hz 

CI 

EL 

BI 

VI 

vc 

CM 

XH 

VD 

m 

•m 

IH 
22 
MU 
ML 
DR 
HX 
LV 
KO 
PM 
AB 
TU 
UL 
AS 
ZQ 
IH 
0E 
IK 
US 
0E 
BK 
Ą A 
HT 
JS 

zo 

PU 


1000 REM *-* 

1002 REM : Polski Edytor : 
1004 REM : Janusz B. Wi$niewski : 
1006 REM : (c) 1992 Tajemnice ATARI : 
1008 REM *-* 


1010 DATA ffff00807586ad310229fc38e9 
1020 DATA 0485e7a90085e6a90085e085e2 
1030 DATA a9e085ela5e785e3a204a000bl 
1040 DATA e091e2c8d0f9e6ele6e3cad0f2 
1050 DATA a008b98b85a2e020358518a99d 
1060 DATA 79948585e4a985690085e5b982 
1070 DATA 85a2e22035859848a007ble011 
1080 DATA e491e28810f768a88810d0adf4 
1090 DATA 0285eca5e78df402ae5685ac57 
1100 DATA 858e72858c73858e74858c7585 
1110 DATA e8d001c88e7c858c7d85a920a0 
1120 DATA 279980008810fac884ea200282 
1130 DATA 20ba8320b8802059834c9680a2 
1140 DATA 0fbd728595cccal0f860ad4703 
1150 DATA 48ad460348a97d60a9ffaacdfc 
1160 DATA 02f0fb2cfC0210045002a93f85 
1170 DATA db2dfc028efc022083f9c93cf0 
1180 DATA 09c927f00ea8b951fb60a5d849 
1190 DATA 2085d84cb880a5d9498085d94c 
1200 DATA b8800a08c9c0b006e93fb00269 
1210 DATA C0286a6084e8a90085e085ela2 
1220 DATA 07f806e8a5e065e085e026elca 
1230 DATA 10f3d86048202581684a4a4a4a 
1240 DATA 290f09309980008860a2102056 
1250 DATA e41014200281a90c204d81a008 
1260 DATA a5e0201c81a5el202581ac5303 
1270 DATA 60a8a203b959859581a9209585 
1280 DATA 88cal0f360981865e085e09002 
1290 DATA e6el601865e285e29002e6e360 
1300 DATA 204d81a90085eb85daa6eaa9a0 
1310 DATA 958b20ba8320b880a6eac99bf0 
1320 DATA 32297fc9619006c97bb0024920 
1330 DATA c91bf020c97ef012c92190d6c9 
1340 DATA 60b0d2e018b0ce958be6eal0c8 
1350 DATA 8af0c520c081c6eal0bec6daa9 
1360 DATA 20958b608d5a03207381a4daf0 
1370 DATA 016088841Ia9038d5203ad5885 
1380 DATA 8d5403ad59858d5503a9808d5b 
1390 DATA 03202e81ad5a0309038d5203ad 
1400 DATA 56858d5403ad57858d55039860 
1410 DATA 20a2 80a9 9b8daf 85 a6 86e020d0 
1420 DATA 05a910204d81a90c8d5203a210 
1430 DATA 2056e4a98085eb0a85daa9038d 
1440 DATA 0fd260a90420c58110034c0a82 
1450 DATA a5dad0f920a28038a5e6ed5685 
1460 DATA 8d5803a5e7ed5785e9048d5903 
1470 DATA a2102056e4c088f0062035814c 
1480 DATA 028218ad56856d580385d6ad57 
1490 DATA 856d590385d7200a82a200a99b 
1500 DATA 81d620f384c028900aa02784d3 
1510 DATA 20d7824c9082e6d4d002e6d5a2 
1520 DATA ce20188538a5cee5d6a5cfe5d7 
1530 DATA 90d3a5ce85d6a5cf85d7a5d4d0 
1540 DATA 02c6d5c6d4a2074ca480a90820 
1550 DATA C5813018a5dad01438a5d6ed56 
1560 DATA 858d5803a5d7ed57858d590320 
1570 DATA 2e814c0a82a8a5d6c5e6a5d7e5 
1580 DATA e7b03d98c99bd006e6d4d002e6 
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taje 


J+o 


BY 1590 DATA d5a4ce8c00838c0383a4cf8c01 

IP 1600 DATA 838c0483a4d3beff8299ff828a 
NG 1610 DATA c8d0f6ae0183e4d7f008ee0183 
YW 1620 DATA ee0483d0e7e6d6d002e6d71860 
GL 1630 DATA 18a5ce8d3b8369018d3883a5cf 
VT 1640 TATA 8d3c8369008d3983a4d3b93783 
YS 1650 DATA 993783c8d0f7ae3c83e4d7f009 
JT 1660 DATA ee3983ee3c834c3783a5d6d002 
KB 1670 DATA c6d7c6d660a6db301dc93cd003 
YR 1680 DATA 4c2c82c93ed0034cb582c91bd0 
LT 1690 DATA 3420ad80a5ec8df4026c0a00a4 
BV 1700 DATA dad00aa006d96a85f0258810f8 
VP 1710 DATA a00084dac99bf014c9619006c9 
HS 1720 DATA 7bb00245d805d920f384c0?790 
0Q 1730 DATA 016020d7824c8384980aa8b948 
NY 1740 DATA 8585e2b9498585e36ce200a558 
SZ 1750 DATA 85e2a55985e3a027b9800020f3 
CL 1760 DATA 8049809le28810f3a928206981 
XB 1770 DATA a5cc85e0a5cd85ela200a000a5 
OR 1780 DATA e0c5d6a5ele5d7b01fble0c99b 
EH 1790 DATA 08d002a92020f380e4d2d006c4 
YJ 1800 DATA d3d00245eb9Ie2c828d0e4205e 
BM 1810 DATA 81a900c028f00591e2c8d0f798 
PQ 1820 DATA 206981e8e017d0cl60a9ff85da 
QO 1830 DATA 60205384b01fa4d3blcec99bd0 
PR 1840 DATA 0d20bf84b012a5d4d002c6d5c6 
IB 1850 DATA d420208320f384c028b00160a9 
0Q 1860 DATA 9b4cd782c6d3186038a4d3d0f7 
OS 1870 DATA a5d005dlf0f42064844cec8420 
XZ 1880 DATA d484b0e9a2ce200185a5d2f005 
FL 1890 DATA c6d24cac84a2cc2001854cac84 
OX 1900 DATA e6d31860a4d3blcec99bd0f420 
TY 1910 DATA bf84b0f220e68420c884b0eaa2 
WG 1920 DATA ce201885a5d2c916b004e6d290 
YB 1930 DATA 05a2cc201885a000c4d3f009bl 
WB 1940 DATA cec99bf003c8d0f384d31860a5 
YN 1950 DATA d0c5d4a5dle5d56020bf84b006 
8W 1960 DATA e6d0d002e6dl60a5d005dld002 
HE 1970 DATA 3860a5d0d002c6dlc6d01860a9 
OH 1980 DATA 0085d3186020f38484d3186048 
KW 1990 DATA a000blcec99b£003c810f76860 
OJ 2000 DATA b50085e0b50185elc6ela0ff88 
MT 2010 DATA ble0c99bd0f9c84c2985b50085 
GF 2020 DATA e0b50185e1a000b1e0c 8c9 9bd0 
OE 2030 DATA f9205e81a5e09500a5el950160 
CD 2040 DATA 9500a90016002al6002al6002a 
TH 2050 DATA 05e79501600020846484938453 
ET 2060 DATA 84838425842a84af858b004c6f 
VH 2070 DATA 616453617665466169§c456469 
HN 2080 DATA 741blcldlelf7efe00af85af85 
WH 2090 DATA 000000000000b085200000ff41 
SP 2100 DATA 43454c4e4f53585a6163656c6e 
IY 2110 DATA 6£737a7a020902070909090900 
HD 2120 DATA 1800000000000000180C083000 
EA 2130 DATA 000000009b9ba9608db085ade7 
GN 2140 DATA 028de002ade8028del02a90085 
MG 2150 DATA Cfa90085d2a98085d3ade70285 
LH 2160 DATA d4ade80285d538a5d2e5d485d0 
GY 2170 DATA a5d3e5d585dla000f0033866cf 
PI 2180 DATA a5d2c9b0a5d3e98590036ce702 
EY 2190 DATA 24cf70683027bld285ce91d420 
ZG 2200 DATA 6986aaf0dec920f017c940f0d9 
TH 2210 DATA c960f0d5290dc908f0c£90468a 
FV 2220 DATA 291fc909f03fbld2c8c900bld2 
YC 2230 DATA 88e9809012bld2c8c9b0bld288 
VC 2240 DATA e985b006a5d0a6dl900724cf30 
HK 2250 DATA ala900aa85d686d738bld2e5d6 
XJ 2260 DATA 91d4206986bld2e5d791d42069 
MQ 2270 DATA 864ceb85bld24c5c86e6d2d002 
TT 2280 DATA e6d3e6d4d002e6d560e002el02 
FX 2290 DATA b085 


Dla uzyskania samodzielnego programu maszynowe¬ 
go, przeznaczonego do współpracy z DOS-em lub 
COS-em należy zastosować Zgrywus+ z TA 1/92 

Wczytywanie tekstu do edytora umożliwia kombina¬ 
cja klawiszy SHlFT/CONTROL/<, zaś zapis - 
SHlFT/CONTROL/>. Opuszczenie edytora: 

SHIFT/CONTROL/ESC 


HB 1000 REM *-,—* 

PA 1002 REM : CZYTNIK polskich tekstów : 
YM 1004 REM : Janusz B. Wi$niewski : 
YY 1006 REM : (c) 1992 Tajemnice ATARI : 

TP 1008 REM *--* 

KA 1010 DATA ffff00647366a270bd40033007 
QG 1020 DATA bd4203c907£009388ae910aad0 
WA 1030 DATA edf03ca94c9d4403a9669d4503 
MN 1040 DATA 38ad3002e94c9d4803ad3102e9 
m 1050 DATA 669d49032056e418a94c7d4803 
CE 1060 DATA 8d4966a9667d49038d4a66a900 
AW 1070 DATA 9d48039d49032056e410fb60a2 
TM 1080 DATA 00bd00e09d0060bd00el9d006 1 
XL 1090 DATA bd00e29d0062bd00e39d0063e8 
MS 1100 DATA d0e5a008b9ec65a2d220f76418 
BH 1110 DATA a9fe79f56585d0a965690085dl 
CV 1120 DATA b9e365a2d420f7649848a007bl 
BE 1130 DATA d211d091d48810f768a88810d0 
TE 1140 DATA a9608df402a24ca06686d684d7 
NP 1150 DATA 20096520d864a205dd0f66f005 
AJ 1160 DATA cal0f830ee8a0aaabdl56685d4 
CT 1170 DATA bdl66685d520d5644cb0646cd4 
TS 1180 DATA 00a2ffecfc02f0f9adfc0?8e£c 
FU 1190 DATA 024c83f90a08c9c0b006e93fb0 
IX 1200 DATA 0269c0286a609500a90016002a 
WV 1210 DATA 16002al6002a0960950160a558 
WX 1220 DATA 85d4a55985d5a5d685d2a5d785 
UD 1230 DATA d3a200a00084dea5d2cd4966a5 
MD 1240 DATA d3ed4a66b022c6debld2c99b08 
EW 1250 DATA d002a92020e86491d4c828f004 
LG 1260 DATA C02890ea981865d285d29002e6 
WJ 1270 DATA d3a900c028£00591d4c8d0f798 
NB 1280 DATA 1865d485d49002e6d5e8e017d0 
BR 1290 DATA b4a027b9216620e864498091d4 
ĘD 1300 DATA 8810f360a9e08df4026868ad47 
XX 1310 DATA 0348ad460348a97d6024del03d 
EV 1320 DATA a000bld6c8c99bd0f9189865d6 
SB 1330 DATA 85d69002e6d7cd4966a5d7ed4a 
WZ 1340 DATA 669020a94cc5d6a966e5d7b016 
ZO 1350 DATA c6d7a0febld688c99bd0f9c838 
RO 1360 DATA 9865d685d69002e6d760a91785 
AM 1370 DATA d820aa65c6d8d0f960a91785d8 
MA 1380 DATA 208965c6d8d0f9604143454c4e 
HI 1390 DATA 4£53585a6163656c6e6f7j7a7a 
AW 1400 DATA 02090207090909090018000000 
HG 1410 DATA 00000000180C08300000000000 
SH 1420 DATA Ic8e8f0e0f217765aa658965cb 
XW 1430 DATA 65d765d765201c2cld202d2067 
BO 1440 DATA 0f72612c640f0c202020202020 
A® 1450 DATA 2020202020455343202d205779 
Ł9 1460 DATA 6al36369652074669b20a0a0ce 
MS 1470 DATA e9e5a0f4el.ebala0daelf3f4ef 
DJ 1480 DATA f3f5eaa0c4cfd3a0b2aeb5a0ec 
SY 1490 DATA f5e2a0c3cfd3a1a0a09be002e3 
IA 1500 DATA 0254640064 
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Czytnik tekstów 

Aby inozna był) przesłać list jako 
pojedynczy, samoprezentujący się 
plik powstał powyższy CZYTNIK 
Użytkownicy zestawu Quick As 
sembler zawarli juz z nim znajo¬ 
mość pod postacią programu CZY¬ 
TAJ Poc zątkowo CZYTAJ stanowił 
niepodzielną całość z tekstem Obe¬ 
cnie jednak program ten Jest eałko 
wicie, niezależny i można go łączyć 
z dowolnymi dokumentami 

Wygenerowany za pomocą Zgiy 
wusa-l- z TA 1 '92 program w wersji 
plikowej należy zapisać na kasecie 
lub dyskietce jako CZYTAJ OBJ 
Będzie to stały nagłówek wszy 
stklc h listów 

Wykreowany za pomocą Polskie¬ 
go Edytora tekst zapisujemy w oso¬ 
bnym pliku. Teraz wystarczy połą 
czyc oba pliki za pomocą programu 
APPEND (TA 5/91) 1 zapisać całość 
Jako CZYTAJ.COM, lub jak tam kto 
woli. Taki program uruchomiony 
spod DOS-u 2 5 z CP lub spod 
COS u sam zaprezentuje swą za¬ 
wartość Niestety, nie działa ze 
SpartaDOS-em Dlaczego? Wlein, 
lecz nie powiem 1 

Janus/ B. Wiśniewski 


Sprostowanie 

Dziś w sensie dosłownym na¬ 
leży się Państwu sprosi owa - 
n i e rysunku wydrukowanego 
w TA 2/92 na str 20 

Ilustracja przedstawia osobę 
paloną odwrotnie na stosie. Nie¬ 
stety jakaś litościwa ręka w 
drukarni postanowiła ulzyc bied¬ 
nej czarownicy i przekręciła ją 
o 180 stopni Stąd szczapy i bu 
chające płomienie znalazły się 
nad głową tej nieszczęsnej ko¬ 
biety 

Drogi czytelniku' Jeśli chcesz 
zobaczyć, jak to wyglądało w za¬ 
myśle autorów, wytnij obrazek 
i przytwierdź go odwrotnie (moż¬ 
ną użyć do tego Innego egzem¬ 
plarza TA). 

Redaktor 


W poprz* dnim odcinku rozważań 
o języku FORTH poznaliśmy dwa 
ważne słowa operujące na pamięci 
komputera Były to 

cg i @ 

W języku TURBO BASIC XL zna¬ 
leźlibyśmy odpowiadające im in 
strukc je- 

PEEK i DPEEK 

Poznajmy teraz dwa nowe słowa 
operujące bezpośrednio na pamięci 
RAM Są to 

Cli! 

Wpisują one podana wartość 
w dowolne komorki pamięci 
W TURBO BASIC XL ic h odpowied¬ 
nikami byłyby Instrukcje: POKE 
i DPOKE 

Słowa C! I 1 potrzebują dwóch 
liczb jako parametrów wejśclo- 
wyc h są to odpowiednio wartość 
i adres. Aby wpisać warlosc np 
4 do komorki 82, wykonajmy na¬ 
stępującą sekwencję 

4 82 ci asm 

Lewy margines w edytorze został 
przesunięty do 4. kolumny, a więc 
zadanie zostało wykonane Aby 
przetestować drugie z poznanych 
slow, napiszmy 

88 e 40 + ee i Eaisaa 

Niby nie się nie stało, lecz pod 
czas próby wejścia kursorem na 
pierwszą linię ekranu, zniknie on 
nam z or/u Co się stało? 

88 (a Pobrało adres początku 
ekranu (znajdujący się w komor 
■ kac h 88 1 89) na stos. 

40 + Dodało do adresu wartość 
40 (przesunęło adres o 40 bajtowi 

88 ! Wpisało zmieniony adres, do 
odpowiednich koniorek 



Uzyskaliśmy przesunięcie o Jedną 
linię ekranu wprowadzania w sto¬ 
sunku do wyświetlanego obrazu 
W takim wypadku ostatnia linia do¬ 
stępna dla kursora jest niewidoc zna 

To samo zadanie możemy wyko¬ 
nać znacznie prościej, pisząc; 

40 ee + 1 mam 

Widzimy w tym zapisie nie znane 
nam słowo +! Powoduje ono zwię¬ 
kszenie liczby dwubajtowej spod 
podanego adresu (w przykładzie 88 
i starszego czyli 89), o podaną 
wartość (czyli 40) 

Aby powrocie do początkowych 
parametrów edytora, naclsnljmy 
w tym momencie klawisz RESET 

Zdobyte przed chwilą wiadomo¬ 
ści umozliwą nam stworzenie no¬ 
wego słowa związanego z zegarem 
Piszemy 

: OZEGAR! 0 19 1 ; l;I*l»kk’l 

Słowo io umożliwi nam wyzero¬ 
wanie komórek zegara 

Wszystkim którzy mieli do czynie¬ 
nia z innymi Językami programowa 
nia dziwna może się wydawać na 
zwa zaczynająca się od znaku 0. 

Język FORTH nie ma jednak 
żadnych ograniczeń związanych ze 
znakami występującymi w nazwie 
lub z ieh kolejnością W skład na¬ 
zwy mogą wchodzić wrszystkie zna 
ki o kodach ATASCI1 od 33 do 122 
Poprawna z punktu widzenia języ¬ 
ka byłaby np. następująca nazwa 

([*'*]) 

Stworzone przez nas słowa OZE¬ 
GAR! oraz ZEGAR® (poprzedni 
numer TA), możemy wykorzystać- 
do testowania szybkości działania 
dowolnych slow FORTHa 
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ON BYŁ STAŁY, 

TYLKO ONE SIĘ ZMIENIAŁY. 

W języku FORTH spotykamy je¬ 
den rodzaj zmiennych- są to zmien¬ 
ne globalne. Można je wykorzystać 
w ka/dym nowo tworzonym stówie 
Rolę zmiennych lokalnych (znanych 
z Innych języków strukturalnych) 
przejmuje stos 


Tak zadeklarowana zmienna ma 
dhtgosc dwóch bajtów może przyj 
mowae wartości od 32768 do 
32767 ze znaki* m lub od O do 
6553.5 bez znaku Spróbujmy wy¬ 
konać powyższą deklarację na 
komputerze Gdv mamy juz zmien¬ 
ną w słowniku sprawdźmy jej war¬ 
tość. Piszemy. 

one . G5B0D 


Deklaracja zmiennej moż.e wyglą¬ 
dać następująco: 

0 VARIABLE ONE l:ladi:i?i 


Na i kranie zamiast wartości 
O pojawiła się jakaś dziwna liczba 
Co ona oznacza"? 


• O to wartość początkowa 
zmiennej (zawsze musi byc po 
dana). 

• VARIABLE deklaracja zmien¬ 
nej 

• ONE nazwa d« klar iwanej 
zmiennej. 


W języku FORTH wywołanie na¬ 
zwy zmiennej nic daje nam warto¬ 
ści, lecz adres gdzie ta wartość Jest 
przechowywana Byc ;nozc wydaje 
się to niepotrzebną komplikacją. 
Jednak umożliwia szeroki dostęp 
do zmiennej np. z poziomu As- 
semblera FORTHa 



Aby uzyskać wartość zmiennej, 
a nte jej adres, postępujemy tak jak 
byśmy pobierali wartość z dowol- 
nyc h komórek pamięci Piszemy 

więc- 

one @ . HHBEJ 

Istnieje słowo ? (znak zapytania), 
które wyświetla bezpośrednio na 
ekran wartość spod adresu lub 
zmiennej Można więc: uprościć zapis 

one ? EHinns 

W jaki sposob wprowadzić nowa 
wartość do zmiennej? Uważny czy¬ 
telnik domyśla się /apewne. że sko¬ 
ro nazwa zmiennej daje adres 
wprowadzania, zastosujemy pozna¬ 
ne na początku tego artykułu słowo 
1 (wykrzyknik) Wpiowadziny więc 
liczbę 10 

io one t iTimr.n 

i sprawdzamy: 

one ? HHS23 

Na ekranie pojawiła się liczba 10, 
a więc wszystko przebiegło popra¬ 
wnie. 

Wszyscy zauważyli na pewno, ze 
działania na zmiennych nie różnią 
się niczym cxi działań na komór¬ 
kach pamięci. Filozofia języka 
FORTH opiera się między innymi 
na jawności struktur. Przecież 
zmienna io pewien wydzielony ob¬ 
szar pamięci. 

W językach programowania trud 
no obejść się bez deklaracji stałej. 
Zadeklarujmy więc stałą ON o war¬ 
tości 711, 

711 CONSTANT ON 0*71717! 

CONSTANT to słowo deklarują¬ 
ce stałą Sprawdzamy- 

ON . nwiinTi 

Na ekranie pojawiła się wartość 
711 ezj Ii wartość stah j. 

Jeżeli często stosujemy w progra¬ 
mie jakąś liczbę, dobrze Jest zade¬ 
klarować ją jako stałą Kor/yscl są 
wielorakie lepsza czytelność pro¬ 
gramu. łatwość dokonywania 
zmian oraz oszczędność pamięci 
Odwołanie się do stałej wymaga tył 
ko dwóch bajtów pamięci a do licz¬ 
by czterech 














mu 


Nit nii stoi na przeszkodził aby 
z.acli klarować jako siaki dowolny 
adres pamięi i kompuii ra. T.ik leż 
/robiliśmy ze siaki OK 

Zobaezmy. eo zostaiiii wykonu 
ni gdy napiszemy następując a si 
kwi ni ję 

6oco on ! nriPnfl 

Zmieniły się kolory ramki 

Zapis ti go działania wygląda mo¬ 
że dose dziwnit Na pii rws/v rzut 
oka wynikało by z nii go że wpisu|e 
my lii zt k; 6000 do stałej ON Czy 
więc stała jest rztjezywiśc ie stała 
(e/yzby ON su, zmieniali? 

Lii zba 6000 została wpisana pod 
adres 711 i 712 (tam sa rejesiry 
kolorów), a nii do stałej Możemy 
to sprawdził 

on . IMTEia 

Stała ma dalej wartość 711 

Adres zmit miej zdefiniowanej 
przy pomory słowa VAR1ABLE Jest 
określany przez kompilator FORT 
Ha Nie mamy możliwości ingert n 
c ji w ustawienie lego adresu Tylko 
/(klinowanie adresu jako stałe) 
(CONSTANTI daje nam możliwość 
umleszezema (qu isi) zmiennej 
w dowolnvm miejscu np na stro 
nii zerowej Musimy jedn ik uwa 
zae aby obszar ten nii kolidował 
z systemem operacyjnym kompute¬ 
ra bib FORTHa 

Wielu czytelników znających inni 
języki programowania zdziwił za 
pewni lakt istnienia w języku 
FORTU tylko jednego rodzaju 
zmiennych A gdzie zmienni łancu 
c howc tablice jedno l dwu wymiaru 
we zapytają oni? 

FORTH pi siada słowa, które 
umożliwiają tworzenu ni wyc ti 
własnych detinii |i Mo/m tego do 
konać w tak prosiy sposoli, ż< isi 
nic-iile* różnych typów definicji 
zmlennyi h wydaje sę bezcelowe 
Nie ma np większego problemu 
aby stworzyć definicję labliev 3 lub 
4 wymiarowej o dowolnej d 1 ugości 
elementów Sposoby tworzt nta delt 
nl< ]i zostaną pi edslawioni w dal 
szych odcinkach h ge> < yklu 

Obei m i uciąłbym przedstawić 
(•'o nic <-h>wi klęk zwiększa ob¬ 


szar pamięci zajmowanej przez 
zmienną Żmii mia lak powiększo¬ 
na może pi/ei howywai np łan 
i ui h znaków Definicja zniti nnej 
zajmuj ii-ej obszar 10 bajtów wy 
glądałaby następująco: 

0 VARIABLE ALA 8 ALLOT EBjjEU 

0 VARIABLE ALA to de klaracja 
zmienni j 2 bajtowe) o nazwie ALA 
t wartości początkowej 0 

8 ALLOT zwiększyło obszar zaj 
mow my przez zmie nną o 8 bajti w 

Słowo ALI OT ii ije sygnał kom 
pilalorowl aby zostawił w słowniku 
"dziurę" o wielkość i lic/b\ będącej 
na stosie w naszym przypadku 
8 bajtów Słowo to możemy stoso¬ 
wać w dowolnym mit jscu w słowni 
ku ni zywiseie jeżeli m i to jakiś 
sens. 

ACH. TE BŁĘDY! 

Tryb wprowadzania nowych 
słów jaki stosujemy obecnie, nie 
|t st własc iwy dla języka FORTH 
Jest to tzw tryb bezpośredni 
(wykorzystujący standardowy edy¬ 
tor ATARI), a służący normalnie do 
wywoływania pojeclync zyeh słów 
lub ic h testowania. FORTH ma 
własny edytor umożliwiający zapis 
tekstu źródłowego na dyskietkę 
Edytory znajdujące się na dyskietce 
implementacji Extcnded fig 
FORTH, są kłopotliwe w użytkowa 
nlu Pozostańmy więc podczas na 
iik! przy dobrze nam znanym edyto 
rze BASICa. W niedługim e/asie 
spróbuję przedstawić własny idy 
tor 1 mam nadzieję, że znikną wie 
dy ws/ystklt kłopoty związane 
z w prowadzaniem danyc h 

Póki eo, chciałbym zwróelc uwa¬ 
gę na parę spraw 

Jeżeli po napisaniu przykładu 
i naciśnięciu klawisza RETURN, 
nic pojawił się napis OK, oznacza 
to ze wystąpił błąd Posiadacze sta 
c jl dysków powinni mleć włączoną 
stację z dyskietką FORTHa Na 
dyskietce tej znajdują się komunl 
kąty o biec lat h Są one czytane 
i wyświetlane na ekran 

Posfcid irzom magm tofonow ra 
dzlłbym wprowadzić następującą 
sekweni ję: 



0 WARNING 1 

Następnie, zapisanie FORTHa 
słowem CSAVE na taśmie 1 używa 
nie tej wt rsjl.* 

WARN1NG to standardowa zmien¬ 
na, wpływająca na lonnę wyprowa 
lizanych komuntkalow Gdy ma ona 
wartość 0 komunikaty nic będą czy¬ 
tane ze stacji dvskow T podawany bę 
dzie Jedynie numer błędu 

C zasaml może wystąpić błąd 
podczas definiowania nowych słów 
W takim przypadku po sprawdzę 
niu wyglądu słownika zauważymy 
ober nosć nowej nazwy Jednak wy 
wolinie lego słowa (przez naplsa 
nie Jego nazwy) spowoduje wyświet¬ 
lenie. znaku zapytania. Oznacza to 
brak słowa w słowniku gdyż tylko 
jego e/ęsc została skompilowana 

Aby usunąć ten 'śmieć’ ze słowni 
ka, należy napisać: 

SKUDGE ĘffljEE) 

a następnie 
I ORGFT CCC Itbtdi.CI 

W miejsce ccc wpisujemy nazwę 
słowa, które zamierzamy usunąć 
Nie będę na razie tłumaczył działa¬ 
nia słowa SMUDGE Jeżeli chodzi 
o słowo FORGET, to pełni ono bar 
dzo ważną rolę Umożliwia nam 
usunięcie ze słownika dowolnego 
słowa (także poprawnie skompllo 
wanego) Należy jednak pamiętać, 
ze zostaną usunięte także wszystkie 
słowa znajdujące się nad kasowa¬ 
nym słowem 

FORGET nie będzie d/tałało 
w części słownika objętego tzw 
ochroną przed kasowaniem Stand¬ 
ardowo ob|ęty Jest taką ochroną 
podstawowy słownik Języka 
FORTH Ochronę tę można oczywi 
śeie usunąć, leez wymaga to wię¬ 
kszej znajomości budowy słów 

Uwaga, zapisanie FORTHa sło¬ 
wem SAVE lub CSAVE nakłada 
automatycznie, ochronę na cały za¬ 
pisywany słownik 

DWA SŁOWA 
O SŁOWNICZKU 

Aby umożliwić łatwe odszukanie 
dowolnego słowa Języka FORTH, 












zamieszczam poniżej krotki słowni¬ 
czek z poznanyni juz słowami. 

Co jakiś czas będę się starał pre 
zentowae podobne słowntrzkt 
w miarę rozszerzania naszych wia¬ 
domości 

W pierwszej lini, obok nazwy 
przedstawiłem symbolicznie dane 
wejściowe, niezbędne dla danego sło¬ 
wa Miejsce słowa oznaczone zostało 
symbolem —, za nim znajdują się 
czasami dane wyjscowe. Dane te zo¬ 
stają na stosie po wykonaniu słowa 
(np. dodawanie zostawia na stosie 
wynik z dodawania, czyli sumę) 

Jeżeli |cst tylko znak —, oznacza 
to, że słowo nie wpływa bezpośred¬ 
nio na stan stosu. 

W zastosowanej notacji szczyt 
stosu znajduje się po prawej stro 
nie ciągu danych. 

SŁOWNICZEK 

Operacje na pamięci komputera 

@ adr-n 

Pobiera spod adresu adr i adr+1 
wariośc n i umieszcza na stosie 


+! n adr - 

Zwiększa liczbę dwubajtową 
znajdującą się pod adresem adr 
i adr-ł-1. o wartość n 

We wszystkich powyższych przy¬ 
padkach zamiast adresu adr, może 
wystąpię nazwa zmiennej. 

Deklaracje 

: -ccc 

Otwiera deklarację nowego słowa 
o nazwie ccc. W miejscu ccc umie¬ 
szczamy oczywiście dowolną na 
zwę Deklaracja ta musi byc zakon 
czona średnikiem 


Kończy deklarację dwukropko- 
wą Przed średnikiem niezbędna 
jest spacja 

VARIABLE n- CCC 

Słowo deklarujące zmienną o na¬ 
zwie eec i wartosei początkowej n 
Wywołanie tak zadeklarowanej 
zmiennej ece spowoduje umiesz¬ 
czenie jej adre su na stosie. 

CONSTANT n- CCC 


Wyprowadzanie liczb na ekran 

n- 

Wyświetli wartość n na ekranie, 
interpretując Ją Jako liczbę ze zna 
ktem 

U. n- 

Jak wyżej, lecz n jest interpre¬ 
towane jako liczba bez znaku. 

? adr- 

Wyświetla na ekran wartość znaj¬ 
dującą się pod adresem adr 
1adr+1 

Inne 

ALLOT n - 

Podaczas kompilacji zostawia 
w słowniku wolne miejsce o długo¬ 
ści n bajtów 

VLIST - 

Powoduje wyświetlenie nazw, 
wszystkich słów będących w słow¬ 
niku Wyświetlanie można prze¬ 
rwać naciskając np spację w odpo 
wledntm momencie. 

FORGET -ccc 


C@ adr-b 

Pobiera spod adresu adr Jeden 
baji b i umieszcza go na stosie. 

! n adr - 

Umieszcza pod adresem adr 
i adr+1 liczbę dwubajtową n 

C! b adr - 

Umieszeza pod adresem adr 
młodszy bajt liczby b 


Słowo deklarujące stałą o nazwie 
ccc i wartości n Wywołanie tak 
zadeklarowanej stałej ccc spowo¬ 
duje umieszczenie wartosei n na 
stosie 

Działania 

+ - * i / ni n2 - 

wynik 

Słowa te zostawiają na stosie wy¬ 
nik odpowiedniego działania na 
dwóch liczbach ze znakiem n 1 i n2. 



Usuwa ze słownika słowo o na¬ 
zwie ccc wraz z wszystkimi słowa¬ 
mi wprowadzonymi późnie] niz ccc. 

WARNING -adr 

Zmienna wpływająca na format 
komunikatów o błędach. Gdy ma 
wartość 0. komunikaty nie będą 
czytane ze stacji a wyświetlane bę¬ 
dą jedynie numery błędów. 

SAVE - 

Powoduje zapisanie całego 
FORTHa na dyskietkę, wraz z no¬ 
wo wprowadzonymi słowami, 

CSAVE - 

Jak wyżej, lecz zapis na taśmę. 

Na koniec artykułu mała dygresja, 
która nasunęła mi się po obejrzeniu 
implementacji tego Języka na inne 
komputery w tym ATARI ST 

Pamiętajmy, ze poznając Pana 
FORTHa uczymy się efektywnego 
języka na wszystkie komputery, nie 
tylko na ATARI XL/XE 

Roland Pantoła 
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HANDLER 


Z pewnością ka/dy użytkownik stacji dysków zapra¬ 
gnął kiedyś obejrzeć sobie całą zawartość pojedyncze¬ 
go sektora Niestety, instrukcje NOTE/POINT do tego 
celu się nie nadają - dają dostęp tylko do sektorów na¬ 
leżących do pliku, i oczywiście pomijają przy odczycie 
ostatnie 3 bajty. 



Także wszelkiego typu monitory dyskowe mają dosyć 
ograniczone zastosowanie Przedstawiony na listingu 
nr 1 program jest próbą rozwiązania powyższego pro 
blemu Tworzy on (w sposob podany w numerze 8/91 
TA) urządz.enie zewnętrzne o nazwie A:, pozwalające 
na uzyskanie dostępu do dowolnego sektora dysku. 


1 3 

1000 

MX 

1002 


1004 

YY 

1006 

JP 

1008 

RJ 

1010 

SM 

1020 

zx 

1030 

HF 

1040 

FP 

1050 

m 

1060 

pp 

1070 

FŁ 

1080 

QM 

1090 

ZR 

1100 

YS 

1110 

DR 

1120 

DP 

1130 

RF 

1140 

W 

1150 

OM 

1160 

TE 

1170 

H8 

1180 

LP 

1190 

FŁ 

1200 

QP 

1210 

VY 

1220 

GV 

1230 

>TŁ 

1240 

GD 

1250 

TH 

1260 

TH 

1270 

IM 

1280 

RN 

1290 

QT 

1300 

FV 

1310 

LO 

1320 

AQ 

1330 

BX 

1340 

WL 

1350 

CY 

1360 

DE 

1370 

IN 

1380 


1390 

er 

1400 


1410 


REM *-* 

REM : Handler "A:" : 
REM • autor: Macie] Czarnota : 
REM * (c) 1992 Tajemnice ATARI : 

REM *-* 

DATA ffff0090e392a240a0902042c6 
DATA a200bdla03c900f01ac94lf00d 
DATA e8e8e8e021d0eea278a090d004 
DATA a25fa09068684c42c6a201b50c 
DATA 9d9890bde702950ccal0f3a292 
DATA a0904c42c6413a2068616e646c 
DATA 657220762e204949206279204d 
DATA 2e437a61726e6£74619b48616e 
DATA 646c6572206a65737420616b74 
DATA 79776e79202121fd9b4272616b 
DATA 206d69656a7363612077204841 
DATA 5441425320212Ifd9b4f2e6b2e 
DATA 9b209790adlfd0c906d030ad7e 
DATA 92c50cd020ad7£92c50dd019a2 
DATA 0lbd9890950cbd7e929de702ca 
DATA 10f2ae8092ac81924c42c6ae82 
DATA 92ac83922042c6a24lac8492ad 
DATA 85922086e4a9008da892ad8692 
DATA 8de702ad87928de80260ada892 
DATA f003a0al60a52a8da592a0008c 
DATA a492c8c88ca89284f2a52485f3 
DATA a52585f42000d89003a0ff6020 
DATA d2d9a5d48da292a5d58da392a9 
DATA 008da99220dd9lb0l4c92fd0l0 
DATA e6£220dd91b009c954d005a980 
DATA 8da992201292adea0229e0a002 
DATA d99992f0068810f8a0fe608ca7 
DATA 9220£791a00160a0008ca892ad 
DATA a592c904£030aca492f02b88b9 
DATA e492998004c000d0£59899e492 
DATA c8d0£aada992£003202092aca4 
DATA 9288b9800499e492c000d0f520 
DATA 2492a00160aca492d00b202092 
DATA 20f79120ee91a000b9e492c8cc 
DATA a692d002a0008ca492a00l60ac 
DATA a49299e492c8cca692d00b2024 
DATA 9220ee9l20f791a0008ca492a0 
DATA 016020aldba4f2bl24c99bf005 
DATA c900f0011860eea292d003eea3 
DATA 9260aca792b996928da692ada3 
DATA 92d00cada292c904b005a9808d 


W£ 

1420 

TG 

1430 

ME 

1440 


1450 

DN 

1460 

XU 

1470 

Q0 

1480 

GF 

1490 

ĆN 

1500 

CJ 

1510 

WE 

1520 

KC 

1530 

ML 

1540 

FJ 

1550 

W 

1560 

■LA 

1570 

LO 

1580 

VF 

1590 

LR 

1600 

TE 

1610 

CM 

1620 

EU 

1630 

¥L 

1640 

EM 

1650 

SD 

1660 

DQ 

1670 

WR 

1680 

UO 

1690 

vw 

1700 

DJ 

1710 

JQ 

1720 

VK 

1730 

QG 

1740 


DATA a69260a9048dd502a9008dd602 
DATA a953d006a952d002a9508d0203 
DATA ada7920aa8b99c928dd502b99d 
DATA 92 8dd602 ada2 9 2 8d0a03ada392 
DATA 8d0b03a9018d0103ad7c928d04 
DATA 03ad7d928d0503ada392d01lad 
DATA a292c904b00aa9808dd502a900 
DATA 8dd6022053e41008c08bd002a0 
DATA 8868686000e4929790aa92c392 
DATA 8892e493ed905£919e91b£915c 
DATA 915c9100008080000080208000 
DATA 800000010000000000000000 1 
DATA 3a2068616e646c6572206£6469 
DATA 6e7374616c6£77616e799bfd4e 
DATA 6965206d6£6765206£64696e73 
DATA 74616c6f7761632068616e646c 
DATA 657261219be493ae9400200090 
DATA a9608de593a90085c£ade?0285 
DATA d4ade80285d538a99785d2e5d4 
DATA 85d0a99085d3e5d585dla000£0 
DATA 033866cfa5d2c9e5a5d3e99390 
DATA 14ade7021869038daf94ade802 
DATA 69008db0946caf9424cf706330 
DATA 27bld285ce91d420a294aaf0cd 
DATA c920£017c940£0c8c960£0c429 
DATA 0dc908£0be90418a291fc909f0 
DATA 3abld2c8c997bld288e9909012 
DATA bld2c8c9e5bld288e993b006a5 
DATA d0a6dl900724c£3090a900aa85 
DATA d686d738bld2e5d691d420a294 
DATA bld2e5d74c9a94bld291d420a2 
DATA 944cl394e6d2d002e6d3e6d4d0 
DATA 02e6d560e002el02e593 


Forma handlera jest chyba najbardziej uniwersalną 
pozwala bowiem na współpracę z większością progra 
mow użytkowych (choc- program pomyślany jest przede 
wszystkim jako narzędzie wspomagające Basic). Do¬ 
stęp do pojedynczego sektora uzyskujemy (z Basicu) 
przez wykonanie instrukcji 


OPEN #kanał,liczi,licz2,"A:nrsek/T” 

gdzie liczi wybiera kierunek przekazywania danych (4 

- odczyt, 8 zapis), llcz2 Jest Ignorowana, nrsek to nu¬ 
mer żądanego sektora (dziesiętnie), rozszerzenie /T ma 
znaczenie przy instrukcji Close - o tym za momenl Nu- 
mer sektora musi być liczbą w Innym wypadku zasyg 
nallzowany zostanie błąd nr 255. Gęstość zapisu zosta 
nie rozpoznana automatycznie (w przypadku formatu 
innego nlz jeden z trzech standardowych zasygnali¬ 
zowany będzie błąd 254). 1 jeszcze jedno: próba uzy¬ 
skania doslępu do kilku sektorów jednocześnie spowo¬ 
duje błąd nr 161 (to ograniczenie Istnieje głównie ze 
względów oszczędnościowych - każdy sektor wymaga 
256 bajtowego bufora). 

Gdy operacja otwarcia kanału przebiegła pomyślnie 

- możemy Juz do woli odczytywać (GET/INPUT), lub za¬ 
pisywać (PUT/PR1NT) dane Dostęp do sektorów jest 
sekwencyjny, tzn. odczytywane 1 zapisywane są one ko¬ 
lejno, oczywiście po opróżnieniu, bądź zapełnieniu bu¬ 
fora Przekroczenie największego dozwolonego numeru 
sektora powoduje błąd nr 136 - EOF 

Zamknięcia kanału dokonujemy oczywiście Instru¬ 
kcją CLOSE W tym miejscu pora na wyjaśnienie taje¬ 
mniczego rozszerzenta fT w nazwie pliku Otóż przy za¬ 
mykaniu kanału po operac ji zapisu danych w buforze 







m mmm 


tal 


pozostają pewne dane. które oczywiście trzeba zacho¬ 
wać Można to zrot)lć na dwa sposoby po pierwsze wy 
zerować sektor 1 nagrać na nim owe dane, po drugie zaś. 
inozna je 'nałożyć' 1 na poprzednią zawartość lego sekto¬ 
ra Podanie rozszerzenia /T wymusza właśnie, ten drugi 
sposob zapisu. Każde inne (lub Jego brak) wybiera pier 
wszą z podanych opcji Tyle Informacji na lemai obsług! 
handlera. Sposob jego wykorzystania zalezy już od Inwc, 
nejl 1 wyobraźni użytkownika Ze swej strony ehe iałbym 
zaprezentować dwa najbardziej typowe przykłady 

Listing nr 2 przedstawia program kopiu|ący wspo 
magający handler Niestety, standardowe koplery me 
radzą sobie dobrze z odczytem z urządzenia - po pro 
stu czytają dane o długości równe | objętość. 1 swego bu 
lora co z reguły nie jest nikomu potrzebne. Mo| pro¬ 
gram likwiduje tę niedogodność, pytając użytkownika 
o liczbę bajtów do odczytu Kopier prac uje w lrybie 
konwi rsaejl, za każdym razem podając rozmiar dostę¬ 
pnej pamięć I RAM (ok 29 Kb) I długość pliku w bulo- 
rze Wpisanie- powoduje- wyświetlenie katalogu dys- 

AO 2 REM Kopier wspomagający handler A- 
WH 3 REM Autor : Maciej Czarnota * 02.92 
SS 5 GRAPHICS 0:POKE 710,0:? " ACopier ve 
r. 1.0":DIM P$(29),F$(17),PR$(20),0P(2 
) 

SD 10 REM Ustalenie zmiennych 

FB 15 PR$="odezytu zapisu ":0P(1)=7: 

OP(2)=11:OD=l;I.M=PEEK(144)+256*PEEK(14 
5):HM=PEEK(560)+256*PEEK(561) 

QN 20 MX=HM-LM:RESTORE :FOR 1=1 TO 29:REA 
D A:P$(I,I)=CHR$(A):NEXT I 
TI 25 REM Przygotowanie odczytu 
US 30 ILE=MX:BUF=0 

OG 35 REM Właściwa procedura kopiera 
KH 40 ? :? "Bufor : ";MX:? "W buforze : ” 

'' ;BUF:? :? "Podaj nazwę pliku do ";PR$( 

:■ •'* OD* 10-9, OD* 10) 

OS 45 INPUT F$:IF F$= M " THEN 40 
VP 50 IF F$="*“ THEN GOSUB 115:GOTO 40 
EP 55 IF F$="Q" THEN GRAPHICS 0:CLR :END 
NL 60 IF F$=“.“ THEN 0D=1:? CHR$(125);:GO 
TO 30 

ŁN 65 IF F$(1,1)="A” AND OD=l THEN GOSUB 
100 

GA 70 REM Tu zapis/odczyt programu 
DI 75 TRAP 90:OPEN #1,4*OD,128,F$:A=USR(A 
DR(P$) ,OP(OD),ILE J :CLOSE #1 
HX 76 IF OD=1 THEN OD=2:ILE=PEEK(856)+256 
*PEEK(857):BUF=ILE 
SQ 80 GOTO 40 
JZ 85 REM obsługa bledow 

NL 90 CLOSE #1:? CHR$(253);"ERROR - ";PEE 
K (195):GOTO 40 

WM 95 REM Podprogram obsługi odczytu z A 
WW 100 ? "Ile bajtów ":TRAP 75:INPUT ILE: 

’IF ILE>MX THEN ? "To przekracza objęto 
sc bufora":GOTO 75 
2M 105 RETURN 
QL 110 REM Directory 
HO 115 TRAP 90:OPEN #1,6,0,"D:*.*" 

HZ 120 TRAP 125:INPUT #1,F$:? F$:GOTO 120 
HQ 125 CLOSE #1:RETURN 
HD 130 REM Procedurka JMP $E456 
PD 135 DATA 104,104,104,162,16,157,66,3,1 
65,144,157,68,3,165,145,157,69,3,104,1 
57,73,3,104,157,72,3,76,86,228 


kletki kropka (",'j kasuje bufor 1 przestawia program 
w tryb odczytu danych zas "Q powoduje zakończenie 
pracy i przekazanie sterowania do BASIC a 


Trzeci listing zainteresuje z pewnością użytkowni¬ 
ków Qulek Assemblera Tworzy on malutki programik, 
który będzie odczytywany Jako boot dyskowy Wystar¬ 
czy jedynie przed wc zytaniem QA uruchomię handler, 
po czym (|uz w QA) wybrać opcję OBJ, Jako nazwę pli¬ 
ku doec lowego podać ”A 1" i uruchomię opcję asembla 
cjl Proszę zwrocie uwagę na instrukcję OPT 
%1 100101 powodującą przesłanie kodu wynikowego 
na urządzenie zewnętrzne bez nagłówków Po dokład 
nlejsze wyjaśnienia samego programu odsyłam do arty 
kułu Lesława Pasternaka pt "BOOT ("TA" 6/91). 


org 

opt 


$0700 

%1100101 


J 



J 


Nagłówek 


start 


tu 


txt 



I na zakończenie kilka informacji technicznych Po 
przepuszczeniu listingu nr 1 przez "Zgrywusa otrzymuje¬ 
my program zawarty w pliku binarnym Pozrwala to na 
używanie go Jako komendy zewnętrznej CP SYS-a Hand 
ler sam się relokuje 1 podnosi nad siebie MEMLO (uży¬ 
łem do tego celu metody przedstawionej w '1A 8/91) zaj¬ 
muje zaś około 850 bajtów 7 RAM Można tę przestrzeń 
bardzo łatwo zwolnić, naciskając RESET+START Pro¬ 
gram został napisany przy pomocy Qulek Assemblera 


Maciej Czarnota 
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Kochani! Cieszy mnie wielce mnogość listów. Jakie 
przychódzą do te| rubryki Nie wszystkie jednak pro¬ 
gramy odpowiadała w pełni założeniom konkursu Po¬ 
nieważ zasady te dawno nie były przypominane, korzy 
stain z okazji, by je powtórzyć, a przy tym odrobinę 
'podnieść poprzeć zkę” 

Do rywallzac |i mogą startować programy w' ATARI 
BASIC u o długości nie przekraczającej 5 wierszy 
standardowe go t kranu (żadne POKE 82.0 nie wchodzi 
w rachubę) Programy typu FOR 1=1536 . będące 
w istocie zakamuflowanymi programami maszynowy 
ml odpadają na ogoł w przeriblegach 

Tematyka programu Jest dowolna Musi on spełniać Jeden 
podstawowy warunek spodobać się oceniając emu (zdradzę 
Wam jeden sekret nie cierpię tęczowych e!< kłów 1 konwersji 
Dec/Bln) Najwyżej oct niani są programy klórt prezenlują 
coś nowego Nie muszą byf nawet specjalnie użyteczne. Jezt U 
uczą Jakiejś pomysłowej Mł TO DY postępowania 

Na comiesięcznych laureatów konkursu czekają tra 
dycyjnle nagrody po 100 000 zł 1 oczywiście’ zamiesz¬ 
czenie nagrodzonego dzieła w TA Życzę wam wielu cle 
kawych pomysłów na które z niecierpliwością czekam 
Dla tyc h których programy nlt spe łnta|ą podanych wy 
mogów pociec ha Wydrukujemy KAŻDY ciekawy pro 
gram bez względu na ramy konkursów, a jego twórca 
otrzyma normalne wynagrodzenie autorskie 

Oto dzisiejsi laureaci 

TT 

Adam Salamon nadesłał program obliczający lit złu P> 
w sposób wielce oryginalny Jest te* model kotupun rowy 
następującego doświadc z nla Bierzemy kn Iką lgl* 1 rv 
sujc my na arkuszu papieru szereg równoległyc h krcv k 
w odstępach dwukrotnie wlększych od długości Igh N i- 
stepnie rzuc amy Igle na papier z dowolnej wysokości. No¬ 
tujemy, e/v Igła prz.crc leła jedną z narysowanyt h kresek, 
trzy nie Przy powtórzeniu tej e/ynnoscl większą llezht ra¬ 
zy można odkrv ze stosunek prztrelęć do liczby rzutów 
Jest równy w przybliżeniu 1 P! 

Program oblicza* PI korzystając z generatora liczb 
losowv( h Aktualna wartość lost wyświetlana po każdej 
setce rzutów Wzrast ze wzrostem hezhy r/ulow do¬ 
kładność pr/yblt/enla rośnie 



VB 1 DEG :I=0:S=0:N=100:GRAPHICS 0 
OK 2 ? "RZUTY","PI=" 

CH 3 S=S+(RND(0)*2<=COS(RND<0)*90)) 

HS 4 I—1+1:IF I=N THEN ? I,I/S:N=N+100 
FO 5 GOTO 3 

Przy okazji jirzc praszamy pana Adama za błędne wy 
drukowanie |ego programu "Super kolor" w TA 2/92 
na sir. 14 W pierwszym wierszu programu powinno 
byc " POKŁ 1664 + 1 ", a nfc ' POKE 1644 + 1 



WIELKANOC 

Krzysztof Wycbo wałek nadesłał program do wyzn i 
ezanla daty świat Wl< 1 klej Nocy metoda Gaussa Przy¬ 
znam. ze długo czekałem na laki program, nie mogu 
się nigdzie dokopa do opisu u j metody 



CI 1 V=3:iNPUT A: B=* 1NT{ A/19 i :C=A-(B*19, :P 
2=INT(A/4 :C2=A-(B2«4):B3*IHT(A/7;:C = 
A-(B3*7):1F A<>INT{A) OR A<0 THFN 1 


JR 2 D=INT((fNT(A/100)-l)/?j+15:E INT(A/1 
00 -14:IF A<1^83 TF^N D=l r >:E=6 
MP 3 Z»C*l'J+D:X*INT(Z/30 •Y«Z-(X*30) :Z2«=2 
*C2+4*C3+6*Y+E:X2=INT(Z2/7):Y2=Z2-(X2* 
7(:L«Y+Y2+22:TF Ł>31 THEN L=L-31;V=4 
UP 4 JF L=31 THEN ? "31.03/1 .04 .“;A:G0T0 


l 
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TR1X to nowa gra zaliczająca 
się do bardzo popularnego gatunku 
gier zręcznościowe - logicznych. 
Zadanie gracza polega na takim 
manewrowaniu opadającymi na 
dno studni kolumnami, by Ich iden¬ 
tyczne elementy znalazły się obok 
siebie Powoduje to Ich znikanie 
i uniemożliwia wypełnienie studni. 
Cała zabawa trwa do momentu, 
w którym dalsze przesuwanie ko¬ 
lumn staje się niemożliwe. To po¬ 
zornie łatwe zadanie w rzeczywisto¬ 
ści Jest jednak dosyć skomplikowa¬ 
ne Mimo znacznej swobody stero¬ 
wania kolumnami, odpowiednie 
ustawianie elementów nie jest takie 


proste Gra wymaga dużej koncen¬ 
tracji i wyobraźni przestrzennej, 
a także zdolności przewidywania 
oraz planowania kolejnych posu¬ 
nięć. 

"Trix" Jest dobrą grą dla tych spo- 
srod miłośników gier komputero¬ 
wych, których satysfakcjonuje cos 
więcej niz dużo strzelaniny na ekra¬ 
nie. Pole do popisu znajdą tu ama¬ 
torzy logicznych zagadek i wyzwań 
rzucanych przede wszystkim intele¬ 
ktowi 

Autor zadbał tez o atrakcyjność 
grafiki- elementy składowe kolumn 
są wielokolorowe i różnią się 


kształtami, niektóre sposrod nich 
migoczą i pulsują Cl, którzy nie po¬ 
siadają kolorowych monitorów nie 
będą bardzo poszkodowani, ponle 
waz elementy te także w "wersji" 
jednokolorowej prezentują się in¬ 
teresująco. Sprawia to, ze gra nie 
Jest monotonna i nie naraża gracza 
na zbyt szybkie zmęczenie wzroku. 
Dodatkowym atutem Jest tez bar 
dzo dobra muzyka uprzyjemniająca 
ekranowe zmagania. Dzięki temu 
można więc spędzić dużo czasu 
grając w "Trlxa" 1 nie będzie to czas 
zmarnowany. 

Basia 


W ubiegłym roku, w TA nr 7 drukowaliśmy popra¬ 
wkę do syslemu TURBO 2000 która usuwa przyczynę 
jego kolizji z Quick Assemblerem. 


Pan Piolr Gurkowski nadesłał "łatę" do innej wersji 
TURBO 2000 rozpowszechnianej przez. W Ptasznika 
z Elbląga Ta poprawka modylikuje rozkazy odwołują¬ 
ce się do komorek 203 213 tak, by korzystały z lokac ji 
240 244 oraz zmienia nazwę urządzenia "turbo" z "D " 
na "T." w celu uniknięcia kłopotów zwlązanyc h ze spe¬ 
cjalnym traklowaniem stacji dysków przez QA 

Aby dokonać poprawki należy przepisać podane 
wiersze 1 DATA i połączyć je z programem "PATCHER" 
z TA 7/91. clorzytując go rozkazem ENTER Po urucho¬ 
mieniu PATCHER pozwoli wczytać plik TURBO 2000 
i zapisać jego poprawioną wersję. 

Ponieważ opisywana odmiana TURBO 2000 nic 1 , jest 
znana redakcji TA więc poprawkę drukujemy na od 
powiedzialność je j autora 


TA 

1000 

REM POPRAWKA DO TURBO 2000 

NI 

1010 

DATA 

0486,068,084 

DG 

1020 

DATA 

1286,204,241 

CX 

1030 

DATA 

1288,203,240 

XI 

1040 

DATA 

1304,203,2*40 

W 

1050 

DATA 

1310,203,240 

AN 

1060 

DATA 

1323,212,243 

DG 

1070 

DATA 

1325,213,244 

CX 

1080 

DATA 

1335,205,242 

BX 

1090 

DATA 

1342,205,242 

CA 

1100 

DATA 

1344,205,242 

DD 

1110 

DATA 

1364,205,242 

FK 

1120 

DATA 

1368,205,242 


Szanowny Panie Redaktorze 

Na lamach 8 nr "Tajemnic ATAJRT ukazało się ogło¬ 
szenie p. Marka Bodawity, reklamujące grę ROBBO 
20 MB. Niniejszym listem chciałbym ostrzec osoby 
chcące kupić tę wersję gry. Jest to gra tylko dla osób 
posiadających monitory kolorowe. W wersji mono¬ 
chromatycznej kilka planet jest zupełnie niewidocz¬ 
nych. Gra nie była testowana w całości i niestety 10 
planety w H części nie da się przejść, pomimo, że 
w "ROBBO Konstruktorze" jest to możliwe. Spowodo¬ 
wane to zostało " przewijaniem " planety, w czasie 
ktorego Robocik zostaje zabity przez stworka. Naj¬ 
ważniejszą rzeczą dla nas jest kradzież pomysłów 
z rozpowszechnionych przez nas darmowo kilku 
wersji tej gry w celu przetestowania i zebrania opi¬ 
nii. Kitka układów planet jest prawie identycznych, 
w innych wykorzystano charakterystyczne układy 
i pomysły w bezwartościowej oprawie. Oburzeni ty¬ 
mi faktami chcemy ostrzec czytelników TA, którzy 
leszcze nie zakupili gry ROtlBO 20 MB, 

Z poważaniem 


Andrzej Krzyz.ak i Aleksander Sabala 


tuta da 
TURBO 2000 
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13 

■'u 

1000 

BG 

1002 

KI 

1004 

¥¥ 

1006 

JP 

1008 

PR 

1010 

SB 

1020 

PP 

1030 

AM 

1040 

NT 

1050 

AP 

1060 

X8 

1070 

AD 

1080 

m 

1090 

ju 

1100 

AS 

1110 

NZ 

1120 

t.S 

1130 

HI 

1140 

sv 

1150 

PT 

1160 

TR 

1170 

ST 

1180 

JK 

1190 

¥F 

1200 

BS 

1210 

LS 

1220 

HD 

1230 

SS 

1240 

,J2 

1250 

UJ 

1260 

wx 

1270 

TV 

1280 

60 

1290 

AE 

1300 

NR 

1310 


taft 
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FOLLOW ME! : 

autor: W. Rawdanik : 

(c) 1992 Tajemnice ATARI : 


REM 
REM 
REM 
REM 

REM *- 

DATA ffff00809f83a2008a9d0006e8 
DATA d0faa983a200203982a9a085cf 
DATA a98385d0a9008d080620f282a9 
DATA 83a200203982a9028d080620f2 
DATA 82a984a200203982a0ffa954c8 
DATA 91cba952c00dd0f7a954c89lcb 
DATA a9aca200203982a212a000a97c 
DATA 91cba00e91cba9281865cb85cb 
DATA 9002e6cccad0e8a954a00091cb 
DATA a952c8c00ed0f7a95491cba9d5 
DATA a200203982a00bb9358391cb88 
DATA d0f8a904a203203982a00db940 
DATA 8391cb88d0f8a9fc8d0706a209 
DATA a9099d0d0638e901cad0f720bf 
DATA 81a9f88d0706a9038d0906a900 
DATA a2 64 9d0d06cad0f a8d0406a900 
DATA 8d9e838d45838d468320c382a9 
DATA 54a203203982a00db94d839lcb 
DATA 88d0f8a0c820608220ad81ae04 
DATA 06e89d0d068e040620bf81a954 
DATA a203203982a00db95a839lcb88 
DATA d0f8a2008a482086818d060620 
DATA d48168aabd0e06ed0506d00ee8 
DATA bd0e06d0e5206a824cd680a954 
DATA a203203982a00db9678391cb88 
DATA d0f8a0c8206082a954a2032039 
DATA 82a00db974839Icb88d0f8a9ff 
DATA 8dfc02aefc02e8f0fae01df003 
DATA 4cbl80a983a200203982a9a085 
DATA Cfa98385d0a90l8d080620f282 
DATA a9ff8dfc0260adfc02c9fff0f9 



KP 

1320 

DATA 

RJ 

1330 

DATA 

GF 

1340 

DATA 

8M 

1350 

DATA 

OG 

1360 

DATA 

VJ 

1370 

DATA 

UM 

1380 

DATA 

wx 

1390 

DATA 

AT 

1400 

DATA 

CŁ 

1410 

DATA 

ox 

1420 

DATA 

MC 

1430 

DATA 

MC 

1440 

DATA 

MZ 

1450 

DATA 

sx 

1460 

DATA 

TŁ 

1470 

DATA 

Dłł 

1480 

DATA 

¥W 

1490 

DATA 

ZU 

1500 

DATA 

XP 

1510 

DATA 

CZ 

1520 

DATA 

OL 

1530 

DATA 

BU 

1540 

DATA 

¥A 

1550 

DATA 

UJ 

1560 

DATA 

UC 

1570 

DATA 

UL 

1580 

DATA 

zz 

1590 

DATA 

VR 

1600 

DATA 

VE 

1610 

DATA 

AZ 

1620 

DATA 

SB 

1630 

DATA 

PO 

1640 

DATA 

XN 

1650 

DATA 

RX 

1660 

DATA 

R« 

1670 

DATA 

BD 

1680 

DATA 

, AN 

1690 

DATA 

! FK 

1700 

DATA 

I fk 

1710 

DATA 

NN 

1720 

DATA 

1 yt 

1730 

DATA 


a2ff8efc02c9lcf01Ia209dd94 
83f007cal0f830e4d0f4e88a60 
6868684c6981a201ad0ad2c91c 
900738e91ce84cb2818a60a200 
bd0e06f00d8e060620d481ae06 
06e84ccl81608d0206a0008c00 
064820ef816848205182a0808c 
00066820ef81600aa8b98183aa 
88b98183203982a9038d010620 
1482a928a200204182ce0106ad 
0106d0ee60a003ad00069lcbad 
0106c902d013c002d00fa910ae 
0006f002a990186d02069lcb88 
d0de60a45884cba45984ccl865 
cb85cb9002e6cc8al865cc85cc 
60aabd2d838d00d2a9ef8d01d2 
ac07068414a514d0fc8d01d260 
Ce0906d012a9038d0906ee0706 
ad0706c5fed003ce0706f818a9 
016d9e838d9e8320e8828d4683 
8a8d4583ae9e83caec9f839025 
i8a9016d9f838d9f8320e8828d 
4d838a8d4c83d818a2108a6d4c 
838d4c838a6d4d838d4d83a210 
8ad8186d45838d45838al86d46 
838d4683a904a203203982a00d 
b940839Icb88d0f860484a4a4a 
4aaa68290f60a214a00fad0806 
f00ac902d00da90091cbf00bbl 
cb91cf4cl083blcf9Icb88d0e3 
18a92865cb85cb9002e6cca90f 
1865cf85cf9002e6d0cad0c860 
786b5f5a50473f3c35262f2c2c 
2f3700002d250137392e0dl010 
002d21380dl01000002d2f2a00 
32352328000’00000034253221 
3 a003 4 3 900010000002e2 92533 
3425343900010000000024212c 
252a001f000000250129012d01 
c501c901cd01650269026d021f 
Ielal81dlb3335301c0000e002 
el020080 


Follow me, czyli pójdź za mną 
Gra polega na powtarzaniu se¬ 
kwencji liczb (1 zarazem dźwięków) 
losowanych przez komputer. Wy¬ 
śmienita zabawa Ćwiczy pamięć, 
refleks, spostrzegawczość 

Aby uzyskać samodzielny pro¬ 
gram maszynowy, zdatny do wyko 
nanla przy użyciu DOS-u lub COS- 
u, należy do przedstawionych tu 
wierszy DATA dołączyć Zgrywus+ 
z TA 1/92 1 po uruchomieniu zapl 
sać plik z programem na dyskietce 
lub kasecie. 

Można także użyć Mlni-Zgrywu 
sa, prezentowanego w tym nume¬ 
rze. 
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tajemnice 



NOWE PR2YG0Dft0BB0 



DZIĘKI UPRZEJMOŚCI PANA ANDRZEJA 
KRZYŻAKA, AUTORA NIEKOŃCZĄCYCH SIĘ 
NOWYCH PRZYGÓD SŁYNNEGO, DZIELNEGO 
ROBOCIKA, PREZENTUJEMY DZIŚ JEDNĄ 
ZE STWORZONYCH PRZEZ NIEGO ZAGADEK. 
PODANA TU PLANSZĘ NALEŻY PRZEPISAĆ 
PRZY UŻYCIU PROGRAMU ROB OKONSTRUKTO 
MIŁEJ ZABAWY! 






















□ 


r ] 


oferujemy dla Twojego Atari: 


□ 


□ 

□ 

□ 

□ 


ROBBO wspaniała gra zręcznosciowo logi 
c/na. Cena 27 000 zł 

MISJA, FRED 

- Zmagania komandosa w tajnej MISJI, 
Wędrówka z FRI DEM prze/ pełna zaga 
dek i niebezpieczeństw krainę 

Cena zestawu 37 000 zł 

IJASERMANTA, 

ROBBO KONSTRl KTOR 

Efektowna gra logiczna fiolegająca na poko 
namu labiryntu komnat pr/y pomocy umiejęt 
nego sterowania promieniem lasera 
Program użytkowy pozwalający na tworze 
nie gotowych samodzielnie działających gier 
Cena zestawu 37 000 zł. 
Al TOWAT PERKI SYJNY 
doskonały do tworzenia "muzyczek' kom 
puterowych Sprzedawany wraz z instrukcją 
użytkownika Cena programu 40 000 zł 
SAPER gra strategiczna 

C ena gry 36 000 zł. 

A.D.2044 wspaniała gra przygodowa 
z tekstem 

Cena gry na dysku 36 000 zł 
Ctna gry na kasecie: 38 000 zł. 

CHAOS MUSIC COMPOSER 

pakiet zawiera program do komponowa 
ma. moduł odtwarzający (można go dołą 
czyc do własnych programów) oraz 
wyczerpującą instrukcję użytkownika. 

Cena pakietu 40 000 zł 

PANTHER 

wielofunkcyjny edytor tekstów pozwalają 
cy drukować po polsku na wszystkich 
popularnych drukarkach Sprzedawany tak 
że ze złączem MIC ROPRIN I do drukarki 
Cena bez złącza 40 000 zł. 
Cena pakietu ze złączem 220.000 zł. 
IIANSKIOSS 

gra przygodowo - zręcznościowa Poszuki 
wanta planów tajnej broni w bunkrze Wolf 
schanze Cena gry 36 000 zł 

TRIX 

wciągająca gra zręcznościowe logiczna 
Niezły pomysł i dobre wykonanie Recenzja 
wewnątrz numeru Cena gry 36 000 zł. 

Najlepszy na małe” Atari zestaw do 
programowania w języku asemblera. 

□ OUICKASSt MBI I R 

□ IUJC. IIUNII R 

n XI 1 RIł ND edytor tekstów, tabela ko¬ 
dów kalkulator i monitor pamięci 

Uregulowanie należności następuje pr/y od 
hiorze przesyłki Zamówienia, które powinny 
zawierać wyvc/ególnienic rodzaju nośnika 
(kaseta lub dysk) oraz dokładny adres zama¬ 
wiającego, prosimy kierować do 


□ 


□ 


□ 


□ Zestaw procedur bibliotecznych 

□ Podręcznik do wymienionych programów 

Cena zestawu 60 000 zl. 

Wymienione m/ej programy me powstały 
w naszej firmie Zachęcamy jednak do ich 
zakupu 

CU MIFA ZE YAIłłGIRA przygodowa gra fan 
tasy z doskonałą muzyką Cena 38 000 zł I 

□ BATTI F SIIIPS kto z nas mc grał w'okrę i 
ty"? Tutaj zasady te same lecz przeciwnik 
i oprawa znacznie lepsza Cena 39 000 zł | 

C , TacTic gra logiczna recenzja TA 2/92 

Cena 38 000 zł. | 

□ KOI-ONY gra ekonomiczna recenzja 

IA 2/92. . Cena 37 000 zł. | 

CU GEOGRAF IA - prosty program edukacyjny 
obejmujący niektóre zagadnienia geografii go¬ 
spodarczej Polski Cena 34 000 zł j 

dl ORTOGRAFIA któż me ma z nią kłopotów 7 
1 en program może pomóc i wiele nauczyć 

Cena 38 000 zł | 

dl VIDFOGRAPII proste narzędzie do two 
rżenia czołówek filmów VIDEO wraz z in 
strukcją użytkownika Cena 42 000 zł ! 

□ KI ET najnowsza gra zręcznościowa Po¬ 
mysł jakby znany (/YBEX), ale wykonanie 

o wiele lepsze Cena 40 000 zł. | 

CU MÓZGPROf F.SOR - wznowienie znanej 
gry tekstowej Cena 40 000 zł 

CU MASTF R IIFAD doskonała gra logiczna 
z kilkunastominutową muzyką 

Cena 40 000 zł | 

dl RODF.RIC dawno zapowiadane przygody 
rycerza w starym zamczysku Cena 38.000 zł I 
I I BFRTYX zmagania z wrogim komputera [ 
na planecie Bf RTYX Cena 38 000 zł | 

□ OPERATION BEOOD Krwawe starcie 
z niezliczoną ilością przeciwników (Jakby 
znajome Operation Wolf) 

Tylko na dyskietce! Cena 40 000 zł ? 

CU MO\STRl M popularny robal w nowej 
oprawie Cena 40 000 zł J 

□ SKARBNIK gra logiczna Cena 40 000zł | 

□ I Q. MASTF.R gra zręcznosciowo 

logiczno-edukacyjna Cena 40.000 zł | 

□ MICROPRINT to nie jest gra. Złącze 
równoległe (CENTRONICS) piozwalające 
na podłączenie dowolnej drukarki' 

Cena 190 000 zł I 


L,K. AVALON 
skr. poczt. 46 
38-100 Strzyżów 





























